inst/hannum/preprocess.r

x <- read.csv("hannum-model.csv",stringsAsFactors=F)
coefs <- x[,c("Marker","Coefficient")]
colnames(coefs) <- c("pred.var","coef")
write.csv(coefs, file="coefs.csv",row.names=F)
perishky/meffonym documentation built on Nov. 8, 2024, 8:36 p.m.