quickdash: Calculates the QuickDASH score

In mccartqm/proms: Score Patient-Reported Outcome Measures

Description

Calculates the disability/symptom QuickDASH score, and the optional high performance sport/music or work module scores when specified. The QuickDASH score will not be calculated if more than 1 item is missing. An optional module score will not be calculated if any of the items are missing.

Usage

quickdash(data, symptomvars, include_work = F, workvars = NULL,
  include_sports = F, sportsvars = NULL)

Arguments

data	A data frame.
symptomvars	A character vector of length eleven specifying the names of the eleven questions used to calculate the disability/symptom score.
include_work	Logical value specifying whether to calculate a score for the optional work module
workvars	An optional character vector of length four specifying the names of the four questions used to score the work module.
include_sports	Logical value specifying whether to calculate a score for the optional sports/performing arts module
sportsvars	An optional character vector of length four specifying the names of the four questions used to score the sports/performing arts module.

Value

This function returns the original data frame provided as input with an additional variable storing the QuickDASH score. Additional variables storing the optional module scores are created upon request.

Examples

df <- data.frame(id = 1:200, replicate(15, sample(1:5, 200, replace = T)))

## disability/symptom score only
df <- quickdash(df, names(df)[2:12])

## optional work module score
df <- quickdash(df, names(df)[2:12], include_work=T, workvars=names(df)[13:16])

mccartqm/proms documentation built on May 29, 2019, 11:40 a.m.