R/trim.dat.R

trim.dat <- function(dat) {
    tmp <- strsplit(colnames(dat), "\\.")
    tr <- NULL
    for (i in 1:length(tmp)) {
        tr <- c(tr, tmp[[i]][1] != "X")
    }
    tr
}
BowenNCSU/xMSanalyzer documentation built on May 24, 2019, 7:36 a.m.