P. didymocarpa subsp. lyrata

[jasonratcliff]

Lehmhi County, ID

• Specimens lacking basal sinuses (sensu P. saximontana)
  • Lyrate basal leaves sensu P. d. subsp. lyrata

[jasonratcliff]

• [x] Review P. didymocarpa TeX
• [x] Note specimens.xlsx

[jasonratcliff]

To assess across specimens, select variables with lyrate observations and filter vouchers before base mapping.

library(dplyr)  # >= v1.0.4

lyrate_vouchers <-
  ThesisPackage::herbarium_specimens %>%
  select_if(.tbl = ., ~ TRUE %in% grepl("[Ll]yrate", .x)) %>%
  bind_cols(
    select(.data = ThesisPackage::herbarium_specimens,
      prior_id, Taxon_a_posteriori, Latitude, Longitude,
      Collector, Collection_Number, State, County), .
  ) %>%
  filter(
    if_any(
      .cols = matches("Petiole|leaf"),
      .fns = ~ grepl("[Ll]yrate", .x)
    )
  )

ThesisPackage::build_map(
  specimen_tbl = lyrate_vouchers,
  id_column = "Taxon_a_posteriori",
  legend_title = "Reviewed Annotations",
  map_base = "base"
)