file <- system.file("extdata", "test1.csv", package="PhenStat")
test <- PhenList(dataset=read.csv(file),
testGenotype="Sparc/Sparc")
result <- testDataset(test,
depVariable="Lean.Mass")
# box plot for dataset with two sexes: males and females
scatterplotSexGenotypeBatchResult(result,
graphingName="BMC" )
file <- system.file("extdata", "test4.csv", package="PhenStat")
test_1sex <- PhenList(dataset=read.csv(file),
testGenotype="Mysm1/+")
result_1sex <- testDataset(test_1sex,
depVariable="Lean.Mass")
# box plot for females only dataset
scatterplotSexGenotypeBatchResult(result_1sex,
graphingName="Lean Mass")
Run the code above in your browser using DataLab