inst/knight/preprocess.r

x <- read.csv("13059_2016_1068_MOESM3_ESM.csv", stringsAsFactors=F)

coefs <- x[,c("CpGmarker","CoefficientTraining")]
colnames(coefs) <- c("pred.var","coef")

write.csv(coefs, file="coefs.csv", row.names=F)
perishky/meffonym documentation built on April 5, 2024, 12:21 a.m.