file <- system.file("extdata", "test1.csv", package="PhenStat")
test <- PhenList(dataset=read.csv(file),
testGenotype="Sparc/Sparc")
result <- testDataset(test,
depVariable="Lean.Mass")
classificationTag(result,
userMode="summaryOutput",
phenotypeThreshold=0.001)
classificationTag(result,
userMode="vectorOutput")
Run the code above in your browser using DataLab