# Folder where the fasta files are located.
folder_samples <- system.file('extdata', package ='dartR')
# listing the FASTA files, including their path. Files have an extension
# that contains "fas".
file_names <- list.files(path = folder_samples, pattern = "*.fas",
full.names = TRUE)
# reading fasta files
obj <- gl.read.fasta(file_names)
Run the code above in your browser using DataLab