mirror of
https://github.com/msberends/AMR.git
synced 2025-07-12 11:01:52 +02:00
styled, unit test fix
This commit is contained in:
@ -126,10 +126,11 @@ This AMR package honours this (new) insight. Use \code{\link[=susceptibility]{su
|
||||
}
|
||||
|
||||
\examples{
|
||||
x <- resistance_predict(example_isolates,
|
||||
col_ab = "AMX",
|
||||
year_min = 2010,
|
||||
model = "binomial")
|
||||
x <- resistance_predict(example_isolates,
|
||||
col_ab = "AMX",
|
||||
year_min = 2010,
|
||||
model = "binomial"
|
||||
)
|
||||
plot(x)
|
||||
\donttest{
|
||||
if (require("ggplot2")) {
|
||||
@ -151,14 +152,15 @@ if (require("dplyr")) {
|
||||
|
||||
# create nice plots with ggplot2 yourself
|
||||
if (require("dplyr") && require("ggplot2")) {
|
||||
|
||||
data <- example_isolates \%>\%
|
||||
filter(mo == as.mo("E. coli")) \%>\%
|
||||
resistance_predict(col_ab = "AMX",
|
||||
col_date = "date",
|
||||
model = "binomial",
|
||||
info = FALSE,
|
||||
minimum = 15)
|
||||
resistance_predict(
|
||||
col_ab = "AMX",
|
||||
col_date = "date",
|
||||
model = "binomial",
|
||||
info = FALSE,
|
||||
minimum = 15
|
||||
)
|
||||
head(data)
|
||||
autoplot(data)
|
||||
}
|
||||
|
Reference in New Issue
Block a user