R/get_beautier_paths.R

Defines functions get_beautier_paths

Documented in get_beautier_paths

#' Get the full paths of files in the \code{inst/extdata} folder
#' @param filenames the files' names, without the path
#' @seealso Use \link{get_beautier_path} to get the path of one file
#' @return the filenames' full paths
#' @author Richèl J.C. Bilderbeek
#' @seealso for one file, use \code{\link{get_beautier_path}}
#' @examples
#'   testit::assert(
#'     length(
#'       get_beautier_paths(
#'         c("test_output_0.fas", "anthus_aco.fas", "anthus_nd2.fas")
#'       )
#'      ) == 3
#'    )
#' @export
get_beautier_paths <- function(filenames) {

  for (i in seq_along(filenames)) {
    filenames[i] <- get_beautier_path(filenames[i]) # nolint beautier function
  }

  filenames
}
ropensci/beautier documentation built on March 12, 2019, 8:27 p.m.