knitr::opts_chunk$set( collapse = TRUE, comment = "#>" )
library(qscorer) library(dplyr) library(wakefield)
The following code chunk shows how to create a simulated data.frame containing the items of the PHQ-15 questionnaire:
library(qscorer) library(dplyr) library(wakefield) df.test.phq15 <- simulate_items(num_cols = 15, item_name = 'phq15', item_range = 0:2) glimpse(df.test.phq15)
The resulting data.frame may be used for testing the package's scoring functions:
df.phq15 <- df.test.phq15 %>% scoring_phq15(., items = 2:16, keep = FALSE) glimpse(df.phq15)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.