I tried the following:
pathogens <- c("Adenovirus", "Coronavirus NL63", "Coronavirus HKU1", "Coronavirus 229E", "C