data-raw/create_test_data.R

# create data used in tests from CoRiverNF package

index_flow <- as.matrix(CoRiverNF::cyAnnTot$LeesFerry)
nf_index_flow <- cbind(
  as.numeric(format(zoo::index(CoRiverNF::cyAnnTot$LeesFerry), "%Y")),
  index_flow
)

nf_mon_flow <- CoRiverNF::monthlyInt["1906/"]

save(nf_index_flow, nf_mon_flow, file = "tests/testthat/nf_test_data.rda")
rabutler-usbr/knnstdisagg documentation built on Sept. 14, 2023, 2:47 p.m.