Skip to contents

Remove null TRS URLS

Usage

remove_null_urls(x)

Arguments

x

A list of lists with a url element

Value

the original lists with a url element filtered to remove nulls

Examples

c(1, 10) |>
  purrr::map(\(id) compose_jecfa_list(id) |> get_result()) |>
  create_df() |>
  process_df() |>
  add_metadata() |>
  compose_urls() |>
  remove_null_urls() # only the second element remain, i.e. report 10
#> Warning: Condition not satisfied, skipping...
#> [[1]]
#> [[1]]$url
#> [1] "http://apps.who.int/iris/bitstream/10665/41962/1/WHO_TRS_868.pdf"
#> 
#> [[1]]$fnm
#> 2-TRS_868.pdf
#> 
#> [[1]]$fnm_noid
#> TRS_868.pdf
#> 
#>