Added R script for new virtual transition count sampling algorithm.