P281424/AMR
1
0
Fork 0
mirror of https://github.com/msberends/AMR.git synced 2025-07-09 02:03:04 +02:00
Code Releases Activity

fix documentation

Browse Source
This commit is contained in:
dr. M.S. (Matthijs) Berends
2022-10-06 11:33:30 +02:00
parent 0d8b098220
commit b9342d103e
8 changed files with 64 additions and 67 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
R/mo.R
View File

@ -113,9 +113,8 @@
#' "staaur",
#' "S. aureus",
#' "S aureus",
#' "Staphylococcus aureus",
#' "Staphylococcus aureus (MRSA,",
#' "Zthafilokkoockus oureuz", # handles incorrect spelling
#' "Sthafilokkockus aureus", # handles incorrect spelling
#' "Staphylococcus aureus (MRSA)",
#' "MRSA", # Methicillin Resistant S. aureus
#' "VISA", # Vancomycin Intermediate S. aureus
#' "VRSA", # Vancomycin Resistant S. aureus
@ -822,6 +821,7 @@ print.mo_uncertainties <- function(x, ...) {
txt <- paste(txt,
paste0(
paste0(
"", strrep(font_grey("-"), times = options()$width), "\n",
'"', x[i, ]$original_input, '"',
" -> ",
paste0(
@ -844,7 +844,10 @@ print.mo_uncertainties <- function(x, ...) {
candidates,
sep = "\n"
)
txt <- paste0(gsub("\n\n", "\n", txt), "\n\n")
txt <- gsub("[\n]+", "\n", txt)
# remove first and last break
txt <- gsub("(^[\n]|[\n]$)", "", txt)
txt <- paste0("\n", txt, "\n")
}
cat(txt)
}