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

(v0.9.0.9023) EUCAST 2020 guidelines

Browse Source
This commit is contained in:
dr. M.S. (Matthijs) Berends
2020-02-14 19:54:13 +01:00
parent 5a98e6b777
commit 9b8b02960e
43 changed files with 16588 additions and 14564 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
R/like.R
View File

@ -45,15 +45,15 @@
#'
#' # also supports multiple patterns, length must be equal to x
#' a <- c("Test case", "Something different", "Yet another thing")
#' b <- c("case", "diff", "yet")
#' b <- c( "case", "diff", "yet")
#' a %like% b
#' #> TRUE TRUE TRUE
#'
#' # get frequencies of bacteria whose name start with 'Ent' or 'ent'
#' library(dplyr)
#' example_isolates %>%
#' filter(mo_genus(mo) %like% '^ent') %>%
#' freq(mo_fullname(mo))
#' filter(mo_name(mo) %like% '^ent') %>%
#' freq(mo_genus(mo))
like <- function(x, pattern, ignore.case = TRUE) {
if (length(pattern) > 1) {
if (length(x) != length(pattern)) {