# NOT RUN {
#only used the first 20 individuals due to runtime reasons
fd <- gl.fixed.diff(testset.gl[1:20,], t=0.05)
gl <- gl.collapse(fd, testset.gl[1:20,], recode.table="testset_recode.csv",t=0.026)
# }
Run the code above in your browser using DataLab