poppr.all is a wrapper function that will loop through a list of files from
the working directory, execute [poppr()], and concatenate the
output into one data frame.
if (FALSE) {
# Obtain a list of fstat files from a directory.x <- getfile(multi=TRUE, pattern="^.+?dat$")
# run the analysis on each file.poppr.all(file.path(x$path, x$files))
}