# NOT RUN {
data(gwas)
calc_kernel(gwas, hsa04020, knots=gwas, type='lin', calculation='cpu')
# }
# NOT RUN {
gwas2 <- new('GWASdata', pheno=pheno[1:10,], geno=geno[1:10,], anno=anno, desc=" study 2")
calc_kernel(gwas, hsa04020, knots = gwas2, type='net', calculation='cpu')
# }
Run the code above in your browser using DataLab