(v1.3.0.9015) as.mo() speedup for valid taxonomic names

vignettes/datasets.Rmd

@@ -20,6 +20,10 @@ knitr::opts_chunk$set(
   fig.width = 7.5,
   fig.height = 5
 )
+
+library(AMR)
+library(dplyr)
+
 options(knitr.kable.NA = '')
 
 file_size <- function(...) {
@@ -74,9 +78,6 @@ download_txt <- function(filename) {
   paste0(msg, collapse = "")
 }
 
-library(AMR)
-library(dplyr)
-
 print_df <- function(x, rows = 6) {
   x %>% 
     head(n = rows) %>%