data-raw/coefs_prevent.R

In bcjaeger/PooledCohort: Predicted Risk for CVD using Pooled Cohort Equations, PREVENT Equations, and Other Contemporary CVD Risk Calculators

coefs_prevent <- list(
  base_10 = readxl::read_xlsx("data-raw/coefs_prevent.xlsx", sheet = 'base_10'),
  acr_10 = readxl::read_xlsx("data-raw/coefs_prevent.xlsx", sheet = 'acr_10'),
  hba1c_10 = readxl::read_xlsx("data-raw/coefs_prevent.xlsx", sheet = 'hba1c_10'),
  sdi_10 = readxl::read_xlsx("data-raw/coefs_prevent.xlsx", sheet = 'sdi_10'),
  full_10 = readxl::read_xlsx("data-raw/coefs_prevent.xlsx", sheet = 'full_10'),

  base_30 = readxl::read_xlsx("data-raw/coefs_prevent.xlsx", sheet = 'base_30'),
  acr_30 = readxl::read_xlsx("data-raw/coefs_prevent.xlsx", sheet = 'acr_30'),
  hba1c_30 = readxl::read_xlsx("data-raw/coefs_prevent.xlsx", sheet = 'hba1c_30'),
  sdi_30 = readxl::read_xlsx("data-raw/coefs_prevent.xlsx", sheet = 'sdi_30'),
  full_30 = readxl::read_xlsx("data-raw/coefs_prevent.xlsx", sheet = 'full_30')
)

usethis::use_data(coefs_prevent, internal = TRUE, overwrite = TRUE)