microorganisms <- microorganisms |>
  bind_rows(
    # Toxoplasma
    data.frame(
      mo = "P_TXPL_GOND", # species
      fullname = "Toxoplasma gondii",
      kingdom = "(unknown kingdom)",
      phylum = "Apicomplexa",
      class = "Conoidasida",
      order = "Eucoccidiorida",
      family = "Sarcocystidae",
      genus = "Toxoplasma",
      species = "gondii",
      subspecies = "",
      rank = "species",
      ref = "Nicolle et al., 1908",
      species_id = NA_real_,
      source = "manually added",
      prevalence = 2,
      stringsAsFactors = FALSE
    ),
    data.frame(
      mo = "P_TXPL", # genus
      fullname = "Toxoplasma",
      kingdom = "(unknown kingdom)",
      phylum = "Apicomplexa",
      class = "Conoidasida",
      order = "Eucoccidiorida",
      family = "Sarcocystidae",
      genus = "Toxoplasma",
      species = "",
      subspecies = "",
      rank = "genus",
      ref = "Nicolle et al., 1909",
      species_id = NA_real_,
      source = "manually added",
      prevalence = 2,
      stringsAsFactors = FALSE
    ),
    data.frame(
      mo = "[FAM]_SRCCYSTD", # family
      fullname = "Sarcocystidae",
      kingdom = "(unknown kingdom)",
      phylum = "Apicomplexa",
      class = "Conoidasida",
      order = "Eucoccidiorida",
      family = "Sarcocystidae",
      genus = "",
      species = "",
      subspecies = "",
      rank = "family",
      ref = "Poche, 1913",
      species_id = NA_real_,
      source = "manually added",
      prevalence = 2,
      stringsAsFactors = FALSE
    ),
    data.frame(
      mo = "[ORD]_EUCCCDRD", # order
      fullname = "Eucoccidiorida",
      kingdom = "(unknown kingdom)",
      phylum = "Apicomplexa",
      class = "Conoidasida",
      order = "Eucoccidiorida",
      family = "",
      genus = "",
      species = "",
      subspecies = "",
      rank = "order",
      ref = "Leger et al., 1910",
      species_id = NA_real_,
      source = "manually added",
      prevalence = 2,
      stringsAsFactors = FALSE
    ),
  ) |>
  arrange(fullname)