data(mouse_msats)
data(bodyweight)
genotypes <- convert_raw(mouse_msats)
(out <- r2_Wf(genotypes = genotypes, trait = bodyweight, family = "gaussian", type = "msats",
nboot = 100, parallel = FALSE, ncores = NULL, CI = 0.95))
Run the code above in your browser using DataCamp Workspace