1
0
mirror of https://github.com/msberends/AMR.git synced 2024-12-25 20:06:12 +01:00
This commit is contained in:
dr. M.S. (Matthijs) Berends 2018-03-19 21:03:23 +01:00
parent dd2517ecb7
commit c765f424ab
No known key found for this signature in database
GPG Key ID: AE86720DBCDA4567
2 changed files with 6 additions and 5 deletions

View File

@ -321,11 +321,12 @@ first_isolate <- function(tbl,
, points_threshold, ')...\n'))
}
}
type_param <- type
all_first <- all_first %>%
mutate(key_ab_lag = lag(key_ab)) %>%
mutate(key_ab_other = !key_antibiotics_equal(x = key_ab,
y = key_ab_lag,
type = type,
type = type_param,
ignore_I = ignore_I,
points_threshold = points_threshold,
info = info)) %>%
@ -594,7 +595,7 @@ key_antibiotics_equal <- function(x,
result[i] <- all(x2 == y2)
} else {
stop('No valid value for type, must be `points` or `keyantibiotics`. See ?first_isolate.')
stop('`', type, '` is not a valid value for type, must be `points` or `keyantibiotics`. See ?first_isolate.')
}
}
}