clinda vs eryth classification

clcazer · Nov 27, 2023 · 7bbf44e · 7bbf44e
1 parent febab51
commit 7bbf44e
Show file tree

Hide file tree

Showing 2 changed files with 12 additions and 0 deletions.
diff --git a/Text Results/Clinda-Eryth.txt b/Text Results/Clinda-Eryth.txt
@@ -0,0 +1,6 @@
+[1] "examine possibility of inducible clindamycin resistance - isolates that appear sensitive to CLINDA but are intermediate/resistant to erythromycin"
+       ERYTH
+CLINDA  FALSE TRUE <NA>
+  FALSE   910    3    1
+  TRUE      5  844    0
+  <NA>      0    1   20
diff --git a/scripts/Staph pseud analysis.R b/scripts/Staph pseud analysis.R
@@ -781,6 +781,12 @@ sink()
 
 rm(OXA_R_probs, OXA_S_probs, PEN_probs)
 
+#examine possibility of inducible clindamycin resistance - isolates that appear sensitive to CLINDA but are intermediate/resistant to erythromycin
+sink("Text Results/Clinda-Eryth.txt")
+print("examine possibility of inducible clindamycin resistance - isolates that appear sensitive to CLINDA but are intermediate/resistant to erythromycin")
+table(MIC_interp$CLINDA, MIC_interp$ERYTH, dnn=c("CLINDA", "ERYTH"), useNA="always")
+sink()
+
 ##### Antibiogram #####
 #generate antibiogram: prevalence of NS for each AM; data grouped by user-defined variable