# NOT RUN {
# To open the Feudtner et.al. pdf from within R use the following
if (!is.null(getOption("pdfviewer"))) {
system(paste0(getOption("pdfviewer"), " ",
file.path(system.file("pccc_references", package = "pccc")), "/",
"Feudtner_etal_2014.pdf"))
}
# If the pdf cannot be opened, you should be able to open it manually by
# navagating to
file.path(system.file("pccc_references", package = "pccc"))
# To view the original SAS program
file.show(system.file("pccc_references", "ccc_version2_sas.sas", package = "pccc"))
# To view the original STATA program
file.show(system.file("pccc_references", "ccc.do", package = "pccc"))
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab