pop <- simulate_admixture(
module = ancestry_module(number_of_founders = 4),
pop_size = 1000,
total_runtime = 11)
require(ggplot2)
plot_frequencies(result = pop)
Run the code above in your browser using DataLab