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
	}
ShixiangWang/arrayConnector documentation built on May 14, 2019, 6:02 a.m.