## those ranks are then used to perform a distinct(), so high impact

rank_order <-
  c(
    "variety",
    "subspecies",
    "species",
    "subgenus",
    "genus",
    "family",
    "order",
    "class",
    "phylum",
    "kingdom",
    # ranks we chose for upload: modify accordingly
    "series",
    "subsection",
    "section",
    "subtribe",
    "tribe",
    "subfamily",
    "superfamily",
    "infraorder",
    "suborder",
    "superorder",
    "infraclass",
    "subclass",
    "superclass",
    "subdivision",
    "division",
    "superdivision",
    "infraphylum",
    "subphylum",
    "infrakingdom",
    "subkingdom"
  )
