# NOT RUN {
data(gwas)
data(hsa04020)
net_kernel <- calc_kernel(gwas, hsa04020, knots=NULL, type='net', calculation='cpu')
show(net_kernel)
summary(net_kernel)
plot(net_kernel, hclust=TRUE)
# }
Run the code above in your browser using DataCamp Workspace