examples/QTL logic regression (trash)/newViennaData.r

data = read.csv("C:/Users/Aliaksandr/Downloads/Genotypingdata-EUmlauflogicregression.csv",colClasses = rep('factor', 19))

dat = as.data.frame(model.matrix( ~ 0+., data[,-1]))[,-2]
names(dat)
names(data)

write.csv(x = dat,file = "C:/Users/Aliaksandr/Downloads/qtlalzg.csv")
aliaksah/EMJMCMC2016 documentation built on July 27, 2023, 5:48 a.m.