data-raw/misc_data.R

fishing_area <- data.frame(
  SUBDIV = c("22", "23", "24", "25", "26", "27", "28", "281", "282", "29", "29N",
             "29S", "30", "31", "32"),
  FishingArea = c("27.3.c.22", "27.3.b.23", "27.3.d.24", "27.3.d.25", "27.3.d.26",
                  "27.3.d.27", "27.3.d.28", "27.3.d.28", "27.3.d.28", "27.3.d.29",
                  "27.3.d.29", "27.3.d.29", "27.3.d.30", "27.3.d.31", "27.3.d.32"),
  stringsAsFactors = FALSE)
#

fleet_key <- readxl::read_xlsx("data-raw/fleet_key.xlsx")
#
usethis::use_data(fishing_area,fleet_key, overwrite = TRUE)
kagervall/ICimportr documentation built on March 18, 2024, 5:19 a.m.