2019-05-23 16:58:59 +02:00
<!DOCTYPE html>
<!-- Generated by pkgdown: do not edit by hand --> < html lang = "en" >
< head >
< meta http-equiv = "Content-Type" content = "text/html; charset=UTF-8" >
< meta charset = "utf-8" >
< meta http-equiv = "X-UA-Compatible" content = "IE=edge" >
< meta name = "viewport" content = "width=device-width, initial-scale=1.0" >
< title > How to determine multi-drug resistance (MDR) • AMR (for R)< / title >
<!-- favicons --> < link rel = "icon" type = "image/png" sizes = "16x16" href = "../favicon-16x16.png" >
< link rel = "icon" type = "image/png" sizes = "32x32" href = "../favicon-32x32.png" >
< link rel = "apple-touch-icon" type = "image/png" sizes = "180x180" href = "../apple-touch-icon.png" >
< link rel = "apple-touch-icon" type = "image/png" sizes = "120x120" href = "../apple-touch-icon-120x120.png" >
< link rel = "apple-touch-icon" type = "image/png" sizes = "76x76" href = "../apple-touch-icon-76x76.png" >
< link rel = "apple-touch-icon" type = "image/png" sizes = "60x60" href = "../apple-touch-icon-60x60.png" >
<!-- jquery --> < script src = "https://cdnjs.cloudflare.com/ajax/libs/jquery/3.3.1/jquery.min.js" integrity = "sha256-FgpCb/KJQlLNfOu91ta32o/NMZxltwRo8QtmkMRdAu8=" crossorigin = "anonymous" > < / script > <!-- Bootstrap --> < link href = "https://cdnjs.cloudflare.com/ajax/libs/bootswatch/3.3.7/flatly/bootstrap.min.css" rel = "stylesheet" crossorigin = "anonymous" >
< script src = "https://cdnjs.cloudflare.com/ajax/libs/twitter-bootstrap/3.3.7/js/bootstrap.min.js" integrity = "sha256-U5ZEeKfGNOja007MMD3YBI0A3OSZOQbeG6z2f2Y0hu8=" crossorigin = "anonymous" > < / script > <!-- Font Awesome icons --> < link rel = "stylesheet" href = "https://cdnjs.cloudflare.com/ajax/libs/font-awesome/4.7.0/css/font-awesome.min.css" integrity = "sha256-eZrrJcwDc/3uDhsdt61sL2oOBY362qM3lon1gyExkL0=" crossorigin = "anonymous" >
<!-- clipboard.js --> < script src = "https://cdnjs.cloudflare.com/ajax/libs/clipboard.js/2.0.4/clipboard.min.js" integrity = "sha256-FiZwavyI2V6+EXO1U+xzLG3IKldpiTFf3153ea9zikQ=" crossorigin = "anonymous" > < / script > <!-- sticky kit --> < script src = "https://cdnjs.cloudflare.com/ajax/libs/sticky-kit/1.1.3/sticky-kit.min.js" integrity = "sha256-c4Rlo1ZozqTPE2RLuvbusY3+SU1pQaJC0TjuhygMipw=" crossorigin = "anonymous" > < / script > <!-- pkgdown --> < link href = "../pkgdown.css" rel = "stylesheet" >
< script src = "../pkgdown.js" > < / script > <!-- docsearch --> < script src = "../docsearch.js" > < / script > < link rel = "stylesheet" href = "https://cdnjs.cloudflare.com/ajax/libs/docsearch.js/2.6.1/docsearch.min.css" integrity = "sha256-QOSRU/ra9ActyXkIBbiIB144aDBdtvXBcNc3OTNuX/Q=" crossorigin = "anonymous" >
< link href = "../docsearch.css" rel = "stylesheet" >
< script src = "https://cdnjs.cloudflare.com/ajax/libs/mark.js/8.11.1/jquery.mark.min.js" integrity = "sha256-4HLtjeVgH0eIB3aZ9mLYF6E8oU5chNdjU6p6rrXpl9U=" crossorigin = "anonymous" > < / script > < link href = "../extra.css" rel = "stylesheet" >
< script src = "../extra.js" > < / script > < meta property = "og:title" content = "How to determine multi-drug resistance (MDR)" >
< meta property = "og:description" content = "" >
< meta property = "og:image" content = "https://msberends.gitlab.io/AMR/logo.png" >
< meta name = "twitter:card" content = "summary" >
<!-- mathjax --> < script src = "https://cdnjs.cloudflare.com/ajax/libs/mathjax/2.7.5/MathJax.js" integrity = "sha256-nvJJv9wWKEm88qvoQl9ekL2J+k/RWIsaSScxxlsrv8k=" crossorigin = "anonymous" > < / script > < script src = "https://cdnjs.cloudflare.com/ajax/libs/mathjax/2.7.5/config/TeX-AMS-MML_HTMLorMML.js" integrity = "sha256-84DKXVJXs0/F8OTMzX4UR909+jtl4G7SPypPavF+GfA=" crossorigin = "anonymous" > < / script > <!-- [if lt IE 9]>
< script src = "https://oss.maxcdn.com/html5shiv/3.7.3/html5shiv.min.js" > < / script >
< script src = "https://oss.maxcdn.com/respond/1.4.2/respond.min.js" > < / script >
<![endif]-->
< / head >
< body >
< div class = "container template-article" >
< header > < div class = "navbar navbar-default navbar-fixed-top" role = "navigation" >
< div class = "container" >
< div class = "navbar-header" >
< button type = "button" class = "navbar-toggle collapsed" data-toggle = "collapse" data-target = "#navbar" aria-expanded = "false" >
< span class = "sr-only" > Toggle navigation< / span >
< span class = "icon-bar" > < / span >
< span class = "icon-bar" > < / span >
< span class = "icon-bar" > < / span >
< / button >
< span class = "navbar-brand" >
< a class = "navbar-link" href = "../index.html" > AMR (for R)< / a >
2019-05-29 00:36:48 +02:00
< span class = "version label label-default" data-toggle = "tooltip" data-placement = "bottom" title = "Released version" > 0.6.1.9040< / span >
2019-05-23 16:58:59 +02:00
< / span >
< / div >
< div id = "navbar" class = "navbar-collapse collapse" >
< ul class = "nav navbar-nav" >
< li >
< a href = "../index.html" >
< span class = "fa fa-home" > < / span >
Home
< / a >
< / li >
< li class = "dropdown" >
< a href = "#" class = "dropdown-toggle" data-toggle = "dropdown" role = "button" aria-expanded = "false" >
< span class = "fa fa-question-circle" > < / span >
How to
< span class = "caret" > < / span >
< / a >
< ul class = "dropdown-menu" role = "menu" >
< li >
< a href = "../articles/AMR.html" >
< span class = "fa fa-directions" > < / span >
Conduct AMR analysis
< / a >
< / li >
< li >
< a href = "../articles/resistance_predict.html" >
< span class = "fa fa-dice" > < / span >
Predict antimicrobial resistance
< / a >
< / li >
< li >
< a href = "../articles/MDR.html" >
< span class = "fa fa-skull-crossbones" > < / span >
Determine multi-drug resistance (MDR)
< / a >
< / li >
< li >
< a href = "../articles/WHONET.html" >
< span class = "fa fa-globe-americas" > < / span >
Work with WHONET data
< / a >
< / li >
< li >
< a href = "../articles/SPSS.html" >
< span class = "fa fa-file-upload" > < / span >
Import data from SPSS/SAS/Stata
< / a >
< / li >
< li >
< a href = "../articles/EUCAST.html" >
< span class = "fa fa-exchange-alt" > < / span >
Apply EUCAST rules
< / a >
< / li >
< li >
< a href = "../reference/mo_property.html" >
< span class = "fa fa-bug" > < / span >
Get properties of a microorganism
< / a >
< / li >
< li >
< a href = "../reference/ab_property.html" >
< span class = "fa fa-capsules" > < / span >
Get properties of an antibiotic
< / a >
< / li >
< li >
< a href = "../articles/freq.html" >
< span class = "fa fa-sort-amount-down" > < / span >
Create frequency tables
< / a >
< / li >
< li >
< a href = "../articles/G_test.html" >
< span class = "fa fa-clipboard-check" > < / span >
Use the G-test
< / a >
< / li >
< li >
< a href = "../articles/benchmarks.html" >
< span class = "fa fa-shipping-fast" > < / span >
Other: benchmarks
< / a >
< / li >
< / ul >
< / li >
< li >
< a href = "../reference/" >
< span class = "fa fa-book-open" > < / span >
Manual
< / a >
< / li >
< li >
< a href = "../authors.html" >
< span class = "fa fa-users" > < / span >
Authors
< / a >
< / li >
< li >
< a href = "../news/" >
< span class = "far fa far fa-newspaper" > < / span >
Changelog
< / a >
< / li >
< / ul >
< ul class = "nav navbar-nav navbar-right" >
< li >
< a href = "https://gitlab.com/msberends/AMR" >
< span class = "fab fa fab fa-gitlab" > < / span >
Source Code
< / a >
< / li >
< li >
< a href = "../LICENSE-text.html" >
< span class = "fa fa-book" > < / span >
Licence
< / a >
< / li >
< / ul >
< form class = "navbar-form navbar-right" role = "search" >
< div class = "form-group" >
< input type = "search" class = "form-control" name = "search-input" id = "search-input" placeholder = "Search..." aria-label = "Search for..." autocomplete = "off" >
< / div >
< / form >
< / div >
<!-- /.nav - collapse -->
< / div >
<!-- /.container -->
< / div >
<!-- /.navbar -->
< / header > < div class = "row" >
< div class = "col-md-9 contents" >
< div class = "page-header toc-ignore" >
< h1 > How to determine multi-drug resistance (MDR)< / h1 >
< h4 class = "author" > Matthijs S. Berends< / h4 >
2019-05-28 16:50:40 +02:00
< h4 class = "date" > 28 May 2019< / h4 >
2019-05-23 16:58:59 +02:00
< div class = "hidden name" > < code > MDR.Rmd< / code > < / div >
< / div >
< p > With the function < code > < a href = "../reference/mdro.html" > mdro()< / a > < / code > , you can determine multi-drug resistant organisms (MDRO). It currently support these guidelines:< / p >
< ul >
< li > “Intrinsic Resistance and Exceptional Phenotypes Tables”, by EUCAST (European Committee on Antimicrobial Susceptibility Testing)< / li >
< li > “Companion handbook to the WHO guidelines for the programmatic management of drug-resistant tuberculosis”, by WHO (World Health Organization)< / li >
< li > “WIP-Richtlijn Bijzonder Resistente Micro-organismen (BRMO)”, by RIVM (Rijksinstituut voor de Volksgezondheid, the Netherlands National Institute for Public Health and the Environment)< / li >
< / ul >
< p > As an example, I will make a data set to determine multi-drug resistant TB:< / p >
< div class = "sourceCode" id = "cb1" > < pre class = "sourceCode r" > < code class = "sourceCode r" > < a class = "sourceLine" id = "cb1-1" title = "1" > < span class = "co" > # a helper function to get a random vector with values S, I and R< / span > < / a >
< a class = "sourceLine" id = "cb1-2" title = "2" > < span class = "co" > # with the probabilities 50%-10%-40%< / span > < / a >
< a class = "sourceLine" id = "cb1-3" title = "3" > sample_rsi < -< span class = "st" > < / span > < span class = "cf" > function< / span > () {< / a >
< a class = "sourceLine" id = "cb1-4" title = "4" > < span class = "kw" > < a href = "https://www.rdocumentation.org/packages/base/topics/sample" > sample< / a > < / span > (< span class = "kw" > < a href = "https://www.rdocumentation.org/packages/base/topics/c" > c< / a > < / span > (< span class = "st" > "S"< / span > , < span class = "st" > "I"< / span > , < span class = "st" > "R"< / span > ),< / a >
< a class = "sourceLine" id = "cb1-5" title = "5" > < span class = "dt" > size =< / span > < span class = "dv" > 5000< / span > ,< / a >
< a class = "sourceLine" id = "cb1-6" title = "6" > < span class = "dt" > prob =< / span > < span class = "kw" > < a href = "https://www.rdocumentation.org/packages/base/topics/c" > c< / a > < / span > (< span class = "fl" > 0.5< / span > , < span class = "fl" > 0.1< / span > , < span class = "fl" > 0.4< / span > ),< / a >
< a class = "sourceLine" id = "cb1-7" title = "7" > < span class = "dt" > replace =< / span > < span class = "ot" > TRUE< / span > )< / a >
< a class = "sourceLine" id = "cb1-8" title = "8" > }< / a >
< a class = "sourceLine" id = "cb1-9" title = "9" > < / a >
< a class = "sourceLine" id = "cb1-10" title = "10" > my_TB_data < -< span class = "st" > < / span > < span class = "kw" > < a href = "https://www.rdocumentation.org/packages/base/topics/data.frame" > data.frame< / a > < / span > (< span class = "dt" > rifampicin =< / span > < span class = "kw" > sample_rsi< / span > (),< / a >
< a class = "sourceLine" id = "cb1-11" title = "11" > < span class = "dt" > isoniazid =< / span > < span class = "kw" > sample_rsi< / span > (),< / a >
< a class = "sourceLine" id = "cb1-12" title = "12" > < span class = "dt" > gatifloxacin =< / span > < span class = "kw" > sample_rsi< / span > (),< / a >
< a class = "sourceLine" id = "cb1-13" title = "13" > < span class = "dt" > ethambutol =< / span > < span class = "kw" > sample_rsi< / span > (),< / a >
< a class = "sourceLine" id = "cb1-14" title = "14" > < span class = "dt" > pyrazinamide =< / span > < span class = "kw" > sample_rsi< / span > (),< / a >
< a class = "sourceLine" id = "cb1-15" title = "15" > < span class = "dt" > moxifloxacin =< / span > < span class = "kw" > sample_rsi< / span > (),< / a >
< a class = "sourceLine" id = "cb1-16" title = "16" > < span class = "dt" > kanamycin =< / span > < span class = "kw" > sample_rsi< / span > ())< / a > < / code > < / pre > < / div >
< p > Because all column names are automatically verified for valid drug names or codes, this would have worked exactly the same:< / p >
< div class = "sourceCode" id = "cb2" > < pre class = "sourceCode r" > < code class = "sourceCode r" > < a class = "sourceLine" id = "cb2-1" title = "1" > my_TB_data < -< span class = "st" > < / span > < span class = "kw" > < a href = "https://www.rdocumentation.org/packages/base/topics/data.frame" > data.frame< / a > < / span > (< span class = "dt" > RIF =< / span > < span class = "kw" > sample_rsi< / span > (),< / a >
< a class = "sourceLine" id = "cb2-2" title = "2" > < span class = "dt" > INH =< / span > < span class = "kw" > sample_rsi< / span > (),< / a >
< a class = "sourceLine" id = "cb2-3" title = "3" > < span class = "dt" > GAT =< / span > < span class = "kw" > sample_rsi< / span > (),< / a >
< a class = "sourceLine" id = "cb2-4" title = "4" > < span class = "dt" > ETH =< / span > < span class = "kw" > sample_rsi< / span > (),< / a >
< a class = "sourceLine" id = "cb2-5" title = "5" > < span class = "dt" > PZA =< / span > < span class = "kw" > sample_rsi< / span > (),< / a >
< a class = "sourceLine" id = "cb2-6" title = "6" > < span class = "dt" > MFX =< / span > < span class = "kw" > sample_rsi< / span > (),< / a >
< a class = "sourceLine" id = "cb2-7" title = "7" > < span class = "dt" > KAN =< / span > < span class = "kw" > sample_rsi< / span > ())< / a > < / code > < / pre > < / div >
< p > The data set looks like this now:< / p >
< div class = "sourceCode" id = "cb3" > < pre class = "sourceCode r" > < code class = "sourceCode r" > < a class = "sourceLine" id = "cb3-1" title = "1" > < span class = "kw" > < a href = "https://www.rdocumentation.org/packages/utils/topics/head" > head< / a > < / span > (my_TB_data)< / a >
< a class = "sourceLine" id = "cb3-2" title = "2" > < span class = "co" > # rifampicin isoniazid gatifloxacin ethambutol pyrazinamide moxifloxacin< / span > < / a >
2019-05-29 00:36:48 +02:00
< a class = "sourceLine" id = "cb3-3" title = "3" > < span class = "co" > # 1 S S R R S R< / span > < / a >
< a class = "sourceLine" id = "cb3-4" title = "4" > < span class = "co" > # 2 R S S S S R< / span > < / a >
< a class = "sourceLine" id = "cb3-5" title = "5" > < span class = "co" > # 3 S S S S I I< / span > < / a >
< a class = "sourceLine" id = "cb3-6" title = "6" > < span class = "co" > # 4 S I R I I S< / span > < / a >
< a class = "sourceLine" id = "cb3-7" title = "7" > < span class = "co" > # 5 S R S R R R< / span > < / a >
< a class = "sourceLine" id = "cb3-8" title = "8" > < span class = "co" > # 6 R R R R S S< / span > < / a >
2019-05-23 16:58:59 +02:00
< a class = "sourceLine" id = "cb3-9" title = "9" > < span class = "co" > # kanamycin< / span > < / a >
< a class = "sourceLine" id = "cb3-10" title = "10" > < span class = "co" > # 1 S< / span > < / a >
2019-05-29 00:36:48 +02:00
< a class = "sourceLine" id = "cb3-11" title = "11" > < span class = "co" > # 2 R< / span > < / a >
< a class = "sourceLine" id = "cb3-12" title = "12" > < span class = "co" > # 3 R< / span > < / a >
< a class = "sourceLine" id = "cb3-13" title = "13" > < span class = "co" > # 4 S< / span > < / a >
2019-05-28 16:50:40 +02:00
< a class = "sourceLine" id = "cb3-14" title = "14" > < span class = "co" > # 5 R< / span > < / a >
< a class = "sourceLine" id = "cb3-15" title = "15" > < span class = "co" > # 6 I< / span > < / a > < / code > < / pre > < / div >
2019-05-23 16:58:59 +02:00
< p > We can now add the interpretation of MDR-TB to our data set:< / p >
< div class = "sourceCode" id = "cb4" > < pre class = "sourceCode r" > < code class = "sourceCode r" > < a class = "sourceLine" id = "cb4-1" title = "1" > my_TB_data< span class = "op" > $< / span > mdr < -< span class = "st" > < / span > < span class = "kw" > < a href = "../reference/mdro.html" > mdr_tb< / a > < / span > (my_TB_data)< / a >
< a class = "sourceLine" id = "cb4-2" title = "2" > < span class = "co" > # < / span > < span class = "al" > NOTE< / span > < span class = "co" > : No column found as input for `col_mo`, assuming all records contain Mycobacterium tuberculosis.< / span > < / a >
< a class = "sourceLine" id = "cb4-3" title = "3" > < span class = "co" > # Determining multidrug-resistant organisms (MDRO), according to:< / span > < / a >
< a class = "sourceLine" id = "cb4-4" title = "4" > < span class = "co" > # Guideline: Companion handbook to the WHO guidelines for the programmatic management of drug-resistant tuberculosis< / span > < / a >
< a class = "sourceLine" id = "cb4-5" title = "5" > < span class = "co" > # Version: WHO/HTM/TB/2014.11< / span > < / a >
< a class = "sourceLine" id = "cb4-6" title = "6" > < span class = "co" > # Author: WHO (World Health Organization)< / span > < / a >
< a class = "sourceLine" id = "cb4-7" title = "7" > < span class = "co" > # Source: https://www.who.int/tb/publications/pmdt_companionhandbook/en/< / span > < / a >
2019-05-23 19:39:07 +02:00
< a class = "sourceLine" id = "cb4-8" title = "8" > < span class = "co" > # Warning: Reliability might be improved if these antimicrobial results would< / span > < / a >
< a class = "sourceLine" id = "cb4-9" title = "9" > < span class = "co" > # be available too: CAP (capreomycin), RIB (rifabutin), RFP (rifapentine)< / span > < / a > < / code > < / pre > < / div >
2019-05-23 16:58:59 +02:00
< p > And review the result with a frequency table:< / p >
2019-05-23 18:53:18 +02:00
< div class = "sourceCode" id = "cb5" > < pre class = "sourceCode r" > < code class = "sourceCode r" > < a class = "sourceLine" id = "cb5-1" title = "1" > < span class = "kw" > < a href = "../reference/freq.html" > freq< / a > < / span > (my_TB_data< span class = "op" > $< / span > mdr)< / a > < / code > < / pre > < / div >
< p > < strong > Frequency table of < code > mdr< / code > from < code > my_TB_data< / code > (5,000 x 8)< / strong > < / p >
2019-05-23 19:39:07 +02:00
< p > Class: factor > ordered (numeric)< br >
2019-05-23 18:53:18 +02:00
Length: 5,000 (of which NA: 0 = 0.00%)< br >
2019-05-23 19:39:07 +02:00
Levels: 5: Negative < Mono-resistance < Poly-resistance < Multidrug resistance…< br >
2019-05-23 18:53:18 +02:00
Unique: 5< / p >
< table class = "table" >
< thead > < tr class = "header" >
< th align = "left" > < / th >
< th align = "left" > Item< / th >
< th align = "right" > Count< / th >
< th align = "right" > Percent< / th >
< th align = "right" > Cum. Count< / th >
< th align = "right" > Cum. Percent< / th >
< / tr > < / thead >
< tbody >
< tr class = "odd" >
< td align = "left" > 1< / td >
< td align = "left" > Mono-resistance< / td >
2019-05-29 00:36:48 +02:00
< td align = "right" > 3,214< / td >
< td align = "right" > 64.3%< / td >
< td align = "right" > 3,214< / td >
< td align = "right" > 64.3%< / td >
2019-05-23 18:53:18 +02:00
< / tr >
< tr class = "even" >
< td align = "left" > 2< / td >
< td align = "left" > Negative< / td >
2019-05-29 00:36:48 +02:00
< td align = "right" > 685< / td >
< td align = "right" > 13.7%< / td >
< td align = "right" > 3,899< / td >
< td align = "right" > 78.0%< / td >
2019-05-23 18:53:18 +02:00
< / tr >
< tr class = "odd" >
< td align = "left" > 3< / td >
< td align = "left" > Multidrug resistance< / td >
2019-05-29 00:36:48 +02:00
< td align = "right" > 576< / td >
< td align = "right" > 11.5%< / td >
< td align = "right" > 4,475< / td >
< td align = "right" > 89.5%< / td >
2019-05-23 18:53:18 +02:00
< / tr >
< tr class = "even" >
< td align = "left" > 4< / td >
< td align = "left" > Poly-resistance< / td >
2019-05-29 00:36:48 +02:00
< td align = "right" > 294< / td >
< td align = "right" > 5.9%< / td >
< td align = "right" > 4,769< / td >
< td align = "right" > 95.4%< / td >
2019-05-23 18:53:18 +02:00
< / tr >
< tr class = "odd" >
< td align = "left" > 5< / td >
< td align = "left" > Extensive drug resistance< / td >
2019-05-29 00:36:48 +02:00
< td align = "right" > 231< / td >
< td align = "right" > 4.6%< / td >
2019-05-23 18:53:18 +02:00
< td align = "right" > 5,000< / td >
< td align = "right" > 100.0%< / td >
< / tr >
< / tbody >
< / table >
< / div >
2019-05-23 16:58:59 +02:00
< div class = "col-md-3 hidden-xs hidden-sm" id = "sidebar" >
< / div >
< / div >
< footer > < div class = "copyright" >
< p > Developed by < a href = "https://www.rug.nl/staff/m.s.berends/" > Matthijs S. Berends< / a > , < a href = "https://www.rug.nl/staff/c.f.luz/" > Christian F. Luz< / a > , < a href = "https://www.rug.nl/staff/c.glasner/" > Corinna Glasner< / a > , < a href = "https://www.rug.nl/staff/a.w.friedrich/" > Alex W. Friedrich< / a > , < a href = "https://www.rug.nl/staff/b.sinha/" > Bhanu N. M. Sinha< / a > .< / p >
< / div >
< div class = "pkgdown" >
< p > Site built with < a href = "https://pkgdown.r-lib.org/" > pkgdown< / a > 1.3.0.< / p >
< / div >
< / footer >
< / div >
< script src = "https://cdnjs.cloudflare.com/ajax/libs/docsearch.js/2.6.1/docsearch.min.js" integrity = "sha256-GKvGqXDznoRYHCwKXGnuchvKSwmx9SRMrZOTh2g4Sb0=" crossorigin = "anonymous" > < / script > < script >
docsearch({
apiKey: 'f737050abfd4d726c63938e18f8c496e',
indexName: 'amr',
inputSelector: 'input#search-input.form-control',
transformData: function(hits) {
return hits.map(function (hit) {
hit.url = updateHitURL(hit);
return hit;
});
}
});
< / script >
< / body >
< / html >
