Appendix 2 - Potential Restoration Site Review and Effectiveness Monitoring Data - 2024

Table 5.1

# grab the table from the QGIS project and burn to a csv then read in and present
path <- "~/Projects/gis/restoration_wedzin_kwa/data_field/2024/form_monitoring_ree_20240923.gpkg"
ree1_raw <- sf::st_read(
  path
)


ree1_raw |> 
  readr::write_csv(
    file = "data/inputs_extracted/ree_2024_01.csv",
    na = ""
  )

my_caption <- ("Draft partial summary of results from potential restoration site review and effectiveness monitoring data - 2024")
my_tab_caption()

Table 5.1: Draft partial summary of results from potential restoration site review and effectiveness monitoring data - 2024 NOTE: To view all columns in the table - please click on one of the sort arrows within column headers before scrolling to the right.

ree1_raw <- readr::read_csv(
  "data/inputs_extracted/ree_2024_01.csv"
)

ree1_raw |> 
  sf::st_drop_geometry() |> 
  dplyr::select(
    # date_time_start,
    site_name,
    assessment_comment,
    riparian_notes,
    stability_notes,
    revegetation_notes,
    cover_notes,
    uav_mapping = uav_flight
  ) |> 
  my_dt_table(cols_freeze_left = 0)