## Not run:
# 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)
# ## End(Not run)
Run the code above in your browser using DataLab