## ---- echo = FALSE------------------------------------------------------------
knitr::opts_chunk$set(
collapse = TRUE,
comment = "#>",
fig.path = "README-"
)
## ----eval=FALSE---------------------------------------------------------------
# install.packages("PROscorerTools")
## ----eval=FALSE---------------------------------------------------------------
# devtools::install_github("MSKCC-Epi-Bio/PROscorerTools")
## ----eval = FALSE-------------------------------------------------------------
# library(PROscorerTools)
## ----eval = FALSE-------------------------------------------------------------
# dat <- makeFakeData(n = 20, nitems = 6, values = 0:4, id = TRUE)
## ----eval=FALSE---------------------------------------------------------------
# dat_scored <- scoreScale(df = dat, items = 2:7, type = "sum")
# dat_scored
## ----eval=FALSE---------------------------------------------------------------
# dat_scored <- scoreScale(df = dat, items = 2:7, type = "sum", okmiss = 0.49)
# dat_scored
## ----eval=FALSE---------------------------------------------------------------
# dat_scored <- scoreScale(df = dat, items = 2:7, type = "sum", okmiss = 0.49)
# dat_scored
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.