data-raw/00_sources.R

# Skipping xlsx because the file is corrupt when downloading this way
pdf <- "https://www.cms.gov/CCIIO/Resources/Regulations-and-Guidance/Downloads/CY2019-DIY-instructions.01.17.2020.pdf"
# xlsx <- "https://www.cms.gov/CCIIO/Resources/Regulations-and-Guidance/Downloads/CY2019-DIY-tables.01.17.20.xlsx"
sas <- "https://www.cms.gov/files/zip/2hhs-hcc-software-v0721141a2.zip"

download.file(pdf, destfile = "./data-raw/diy-instructions.pdf")
# download.file(xlsx, destfile = "./data-raw/CY2019-DIY-tables.01.17.20.xlsx")
download.file(sas, destfile = "./data-raw/SAS.zip")

unzip("./data-raw/SAS.zip", exdir = "./data-raw/SAS")

file.remove("./data-raw/SAS.zip")
ArctiCondor/edgedata documentation built on July 29, 2022, 12:01 a.m.