View source: R/filter_annotations.R
filter_annotations | R Documentation |
This function filters initial annotations.
filter_annotations(
annotations = get_params(step =
"filter_annotations")$files$annotations$prepared$structural,
features = get_params(step = "filter_annotations")$files$features$prepared,
rts = get_params(step = "filter_annotations")$files$libraries$temporal$prepared,
output = get_params(step = "filter_annotations")$files$annotations$filtered,
tolerance_rt = get_params(step = "filter_annotations")$ms$tolerances$rt$library
)
annotations |
Prepared annotations file |
features |
Prepared features file |
rts |
Prepared retention time library |
output |
Output file |
tolerance_rt |
Tolerance to filter retention time |
The path to the filtered annotations
## Not run:
tima:::copy_backbone()
go_to_cache()
github <- "https://raw.githubusercontent.com/"
repo <- "taxonomicallyinformedannotation/tima-example-files/main/"
dir <- paste0(github, repo)
annotations <- get_params(step = "filter_annotations")$files$annotations$prepared$structural[[2]] |>
gsub(
pattern = ".gz",
replacement = "",
fixed = TRUE
)
features <- get_params(step = "filter_annotations")$files$features$prepared |>
gsub(
pattern = ".gz",
replacement = "",
fixed = TRUE
)
rts <- get_params(step = "filter_annotations")$files$libraries$temporal$prepared |>
gsub(
pattern = ".gz",
replacement = "",
fixed = TRUE
)
get_file(url = paste0(dir, annotations), export = annotations)
get_file(url = paste0(dir, features), export = features)
get_file(url = paste0(dir, rts), export = rts)
filter_annotations(
annotations = annotations,
features = features,
rts = rts
)
unlink("data", recursive = TRUE)
## End(Not run)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.