## Not run:
#
# # load data genodata
# data(genodata)
#
# # phenotype (first column of genodata)
# pheno = genodata[,1]
#
# # genotype (rest of columns of genodata)
# geno = genodata[,-1]
#
# # apply SKAT with linear kernel
# myskat.linear = SKAT(pheno, geno, kernel="linear")
# myskat.linear
#
# # apply SKAT with weighted linear kernel
# # weights estimated from distribution beta(MAF, a=1, b=25)
# myskat.wlinear = SKAT(pheno, geno, kernel="wlinear", a=1, b=25)
# myskat.wlinear
#
# # apply SKAT with quadratic kernel
# myskat.quad = SKAT(pheno, geno, kernel="quadratic")
# myskat.quad
#
# # apply SKAT with IBS kernel
# myskat.ibs = SKAT(pheno, geno, kernel="IBS")
# myskat.ibs
# ## End(Not run)
Run the code above in your browser using DataLab