## Not run:
# # Estimate Nm for the microsatellite data
# data(msats.g)
# # Run Genepop for Option 4
# results <- genepop(msats.g, output.ext = ".PRI", other.settings = "MenuOptions=4")
# # Locus name mapping and files
# results
# # Show contents of output file
# file.show(results$files["output.fname"])
# ## End(Not run)
Run the code above in your browser using DataLab