Skip to content

Commit cf80074

Browse files
committed
fix check() notes
1 parent 49463d1 commit cf80074

File tree

2 files changed

+4
-4
lines changed

2 files changed

+4
-4
lines changed

R/genome_download_tools.R

Lines changed: 3 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -61,7 +61,7 @@ make_ftp_paths <- function(data, assembly_summary_path){
6161
readr::read_tsv(assembly_summary_path, skip=1) %>%
6262
dplyr::transmute(asm_acc=.data$`# assembly_accession`,
6363
.data$ftp_path)
64-
filter(grepl('https://ftp.ncbi.nlm.nih.gov',ftp_path))
64+
dplyr::filter(grepl('https://ftp.ncbi.nlm.nih.gov',.data$ftp_path))
6565

6666
result <- data %>% dplyr::left_join(ftp_asm_map)
6767

@@ -119,7 +119,7 @@ download_files <-
119119
safe_download <- purrr::safely(utils::download.file)
120120

121121
data %>%
122-
dplyr::select(asm_acc, dplyr::starts_with(type)) %>%
122+
dplyr::select(.data$asm_acc, dplyr::starts_with(type)) %>%
123123
dplyr::mutate("{type}_dl":=purrr::map2(.x=!!rlang::sym(url_var), .y=!!rlang::sym(dest_var), .f = ~safe_download(.x, .y))) %>%
124124
tidyr::unnest_wider(glue::glue('{type}_dl'),
125125
names_sep = '_',
@@ -157,7 +157,7 @@ make_dest_paths <- function(data, type, dest_dir){
157157
#'
158158
#' @param type a user input string to check
159159
#'
160-
#' @return
160+
#' @return returns a named vector of acceptable files and they appropriate suffixes
161161
#'
162162
#' @examples # supported_download_types('fna')
163163
supported_download_types <-

man/supported_download_types.Rd

Lines changed: 1 addition & 1 deletion
Some generated files are not rendered by default. Learn more about customizing how changed files appear on GitHub.

0 commit comments

Comments
 (0)