R/to_numeric.R

Defines functions to_numeric

to_numeric <- function(x) {
    x <- sub("[,.]([0-9]*)$", ";\\1", x)
    x <- gsub("[,. ]", "", x)
    x <- sub(";", ".", x)
    as.numeric(x)
}
trevorld/ledgeR documentation built on Nov. 14, 2021, 8:43 a.m.