1
0
mirror of https://github.com/msberends/AMR.git synced 2025-07-08 18:01:50 +02:00

(v1.7.1.9048) unit tests

This commit is contained in:
2021-10-04 10:22:10 +02:00
parent 7a0ecd6c3b
commit d1b16ce641
20 changed files with 299 additions and 299 deletions

View File

@ -385,13 +385,13 @@ data_1st %>%
summarise(across(penicillins(), resistance, as_percent = TRUE)) %>%
# format the antibiotic column names, using so-called snake case,
# so 'Amoxicillin/clavulanic acid' becomes 'amoxicillin_clavulanic_acid'
rename_with(.fn = ab_name, .cols = penicillins(), snake_case = TRUE)
rename_with(set_ab_names, penicillins())
```
```{r, echo = FALSE, message = FALSE}
data_1st %>%
group_by(hospital) %>%
summarise(across(penicillins(), resistance, as_percent = TRUE)) %>%
rename_with(.fn = ab_name, .cols = penicillins(), snake_case = TRUE) %>%
rename_with(set_ab_names, penicillins()) %>%
knitr::kable(align = "lrr")
```