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:
@ -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")
|
||||
```
|
||||
|
||||
|
Reference in New Issue
Block a user