all.mrk <- make_seq_mappoly(tetra.solcap, 1:20)
## local computation
counts <- cache_counts_twopt(all.mrk, ncpus = 1)
## load from internal file or web-stored counts (especially important for high ploidy levels)
counts.cached <- cache_counts_twopt(all.mrk, cached = TRUE)
Run the code above in your browser using DataLab