data-raw/crop_seed_info.R

library(dplyr)
library(tidyr)

crop_seed_info <- readr::read_csv("crop_seed_info.csv")  %>%
  #Remove extraneous alphanumeric codes from notes column entries such as "RR2 = "
  mutate(notes = sub(".*=\\s+?", '', notes))

devtools::use_data(crop_seed_info, overwrite = TRUE)
ISU-STRIPS/STRIPSMeta documentation built on May 7, 2019, 6:36 a.m.