Running examples in ‘ontologics-Ex.R’ failed
The error most likely occurred in:

> ### Name: new_mapping
> ### Title: Add a new mapping to an ontology
> ### Aliases: new_mapping
> 
> ### ** Examples
> 
> ontoDir <- system.file("extdata", "crops.rds", package = "ontologics")
> onto <- load_ontology(path = ontoDir)
> 
> mapping <- data.frame(old = c("BIOENERGY CROPS", "Bioenergy woody",
+                               "Other bioenergy crops"),
+                       new = c("bioenergy plants", "Wood plantation for fuel",
+                               "Algae for bioenergy"),
+                       type = c("close", "broader", "broader"))
> 
> onto <- new_source(name = "externalDataset",
+                    version = "0.0.1",
+                    description = "a vocabulary",
+                    homepage = "https://www.something.net",
+                    license = "CC-BY-0",
+                    ontology = onto)
> 
> onto <- get_concept(table = data.frame(label = mapping$old), ontology = onto) %>%
+   new_mapping(new = mapping$new,
+               target = .,
+               match = mapping$type,
+               source = "externalDataset",
+               certainty = 3,
+               ontology = onto)
Error in `na_if()`:
! Can't convert `y` <character> to match type of `x` <tbl_df>.
Backtrace:
     ▆
  1. ├─... %>% ...
  2. ├─ontologics::new_mapping(...)
  3. │ └─... %>% arrange(id)
  4. ├─dplyr::arrange(., id)
  5. ├─dplyr::select(...)
  6. ├─dplyr::na_if(., y = "")
  7. │ └─vctrs::vec_cast(x = y, to = x, x_arg = "y", to_arg = "x")
  8. └─vctrs (local) `<fn>`()
  9.   └─vctrs::vec_default_cast(...)
 10.     ├─base::withRestarts(...)
 11.     │ └─base (local) withOneRestart(expr, restarts[[1L]])
 12.     │   └─base (local) doWithOneRestart(return(expr), restart)
 13.     └─vctrs::stop_incompatible_cast(...)
 14.       └─vctrs::stop_incompatible_type(...)
 15.         └─vctrs:::stop_incompatible(...)
 16.           └─vctrs:::stop_vctrs(...)
 17.             └─rlang::abort(message, class = c(class, "vctrs_error"), ..., call = vctrs_error_call(call))
Execution halted