# NOT RUN {
# }
# NOT RUN {
##outcross example
data(example.out)
twopt <- rf.2pts(example.out)
all.mark <- make.seq(twopt,"all")
groups <- group(all.mark)
LG1 <- make.seq(groups,1)
LG1.rec <- record(LG1)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab