mult10 <- multic(sys.avg ~ sex + agexam + agexam^2, data=d10,
famid=famid, id=id, dadid=fa, momid=mo, sex=sex,
mloci='multicInput/mloci.out.gz', share='multicInput/share.out.gz',
calc.fam.log.liks=T)
plotFamilyLods(mult10, npeakfams=3, plot="total")Run the code above in your browser using DataLab