data-raw/testdata-recalculate_age_tx_start.R
In JayAchar/hisreportr: hisreportr: Automating MSF OCA EMR reporting
# test data for
d <- data.frame(patient_id = c(1:3, 3, 4),
starttre = c(lubridate::dmy(c(rep("1/1/15", 3), "1/1/18")), NA),
adm_date = lubridate::dmy(c(NA, "1/1/16", rep("5/3/10", 2), "12/7/08")),
age = "1",
stringsAsFactors = FALSE)
# save
saveRDS(d, "inst/testdata/testdata-recalculate_age_tx_start.rds", version = 2)
JayAchar/hisreportr documentation built on March 18, 2020, 5:57 a.m.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
# test data for
d <- data.frame(patient_id = c(1:3, 3, 4),
starttre = c(lubridate::dmy(c(rep("1/1/15", 3), "1/1/18")), NA),
adm_date = lubridate::dmy(c(NA, "1/1/16", rep("5/3/10", 2), "12/7/08")),
age = "1",
stringsAsFactors = FALSE)
# save
saveRDS(d, "inst/testdata/testdata-recalculate_age_tx_start.rds", version = 2)
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Embedding an R snippet on your website
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.