data(multitrait)
# test normality of 7th phenotype
mqmtestnormal(multitrait, pheno.col=7)
# take log
multitrait <- transformPheno(multitrait, pheno.col=7, transf=log)
# test again
mqmtestnormal(multitrait, pheno.col=7)
Run the code above in your browser using DataLab