P281424/AMR
1
0
Fork 0
mirror of https://github.com/msberends/AMR.git synced 2025-07-08 15:21:58 +02:00
Code Releases Activity

updated microorganism codes

Browse Source
This commit is contained in:
dr. M.S. (Matthijs) Berends
2023-05-26 16:10:01 +02:00
parent 0bcf55d3b6
commit c6135d2082
14 changed files with 59 additions and 42 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
R/aa_helper_functions.R
View File

@ -629,7 +629,12 @@ dataset_UTF8_to_ASCII <- function(df) {
}
documentation_date <- function(d) {
paste0(trimws(format(d, "%e")), " ", month.name[as.integer(format(d, "%m"))], ", ", format(d, "%Y"))
day <- as.integer(format(d, "%e"))
suffix <- rep("th", length(day))
suffix[day %in% c(1, 21, 31)] <- "st"
suffix[day %in% c(2, 22)] <- "nd"
suffix[day %in% c(3, 23)] <- "rd"
paste0(month.name[as.integer(format(d, "%m"))], " ", day, suffix, ", ", format(d, "%Y"))
}
format_included_data_number <- function(data) {