P281424/AMR
1
0
Fork 0
mirror of https://github.com/msberends/AMR.git synced 2025-09-02 19:44:04 +02:00
Code Releases Activity

(v0.7.1.9063) septic_patients -> example_isolates

Browse Source
This commit is contained in:
dr. M.S. (Matthijs) Berends
2019-08-27 16:45:42 +02:00
parent 7a6fce4eb8
commit 93be16484b
92 changed files with 1143 additions and 818 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
man/resistance_predict.Rd
View File

@@ -80,13 +80,13 @@ On our website \url{https://msberends.gitlab.io/AMR} you can find \href{https://
}
\examples{
x <- resistance_predict(septic_patients, col_ab = "AMX", year_min = 2010, model = "binomial")
x <- resistance_predict(example_isolates, col_ab = "AMX", year_min = 2010, model = "binomial")
plot(x)
ggplot_rsi_predict(x)
# use dplyr so you can actually read it:
library(dplyr)
x <- septic_patients \%>\%
x <- example_isolates \%>\%
filter_first_isolate() \%>\%
filter(mo_genus(mo) == "Staphylococcus") \%>\%
resistance_predict("PEN", model = "binomial")
@@ -101,7 +101,7 @@ summary(mymodel)
# create nice plots with ggplot2 yourself
if (!require(ggplot2)) {
data <- septic_patients \%>\%
data <- example_isolates \%>\%
filter(mo == as.mo("E. coli")) \%>\%
resistance_predict(col_ab = "AMX",
col_date = "date",