# NOT RUN {
# STRUCTURE files
sfiles <- list.files(path=system.file("files/structure",package="pophelper"),full.names=TRUE)
slist <- readQ(sfiles)
tabulateQ(qlist=slist)
# TESS files
tfiles <- list.files(path=system.file("files/tess",package="pophelper"),full.names=TRUE)
tlist <- readQ(tfiles)
tabulateQ(qlist=tlist)
# ADMIXTURE files
afiles <- list.files(path=system.file("files/admixture",package="pophelper"),full.names=TRUE)
alist <- readQ(afiles)
tabulateQ(qlist=alist)
# }
Run the code above in your browser using DataLab