if (FALSE) {
save <- hap.score(y, geno, trait.type = "gaussian")
# Example illustrating generic print function:
print(save)
# Example illustrating specific method print function:
print.hap.score(save)
}
Run the code above in your browser using DataLab