# NOT RUN {
mrks.chi.filt <- filter_segregation(input.data = tetra.solcap,
chisq.pval.thres = 0.05/tetra.solcap$n.mrk,
inter = TRUE)
seq.init<-make_seq_mappoly(mrks.chi.filt)
# }
Run the code above in your browser using DataLab