# NOT RUN {
data(jsmackerel)
jsm.ms.genepop.file <- tempfile()
jsm.popname.file <- tempfile()
cat(jsmackerel$MS.genepop, file=jsm.ms.genepop.file, sep="\n")
cat(jsmackerel$popname, file=jsm.popname.file, sep=" ")
# See two text files in temporary directory.
# jsm.ms.genepop.file : GENEPOP format file of microsatellite data
# jsm.popname.file : plain text file of subpopulation names
# }
Run the code above in your browser using DataLab