# NOT RUN {
data(etrait)
qtl<- vector("list",16); qtl[[1]]<- c(1,2)
eps<- data.frame(y=1,q1=1,q2=2)
dists<- dists[c(4,11),]
x<- mdat - 3/2
# }
# NOT RUN {
o<- mtcmim(traits, mpos, mdat, x, xid, dists, qtl=qtl, eps=eps,
win=5, range=-1, pp=2, len=1)
# }
Run the code above in your browser using DataLab