Exporting importFile()

This commit is contained in:
Waldir Leoncio 2023-09-11 12:51:41 +02:00
parent 3e4044bcec
commit 882fcd4112
3 changed files with 38 additions and 0 deletions

View file

@ -1,3 +1,14 @@
#' @title Import data file
#' @description Imports data from several formats (FASTA, VCF, SAM, BAM,
#' Genepop).
#' @param data raw dataset
#' @param format data format (guesses from extension if not provided)
#' @param verbose if \code{TRUE}, prints extra output information
#' @return The data in a format that can be used by the other functions
#' @export
#' @examples
#' path_inst <- system.file("extdata", "", package = "rBAPS")
#' importFile(file.path(path_inst, "FASTA_clustering_haploid.fasta"))
importFile <- function(data, format, verbose) {
# Parsing data format ------------------------------------------------------