tests/tester.R

td <- c("shouldnt", "ive gone home & you")
key <- paste0("\\b", corrections$key, "\\b")
for (i in 1:length(key)) {
  td <- gsub(key[i], corrections$value[i], td, ignore.case = TRUE)
}
td <- gsub("\\&", 'and', td)
DataScienceSalon/predictifyR.3.0 documentation built on May 23, 2019, 8:25 p.m.