# NOT RUN {
data(example.out)
twopts <- rf.2pts(example.out)
markers.ex <- make.seq(twopts,c(3,6,8,12,16,25))
marker.type(markers.ex) # segregation type for some markers
data(fake.f2.onemap)
twopts <- rf.2pts(fake.f2.onemap)
all.mrk<-make.seq(twopts, "all")
lgs<-group(all.mrk)
lg1<-make.seq(lgs,1)
marker.type(lg1) # segregation type for linkage group 1
# }
Run the code above in your browser using DataLab