pms: Person Measures

Description

Estimates person measures assuming item measures are known and all persons use the same set of rating category thresholds.

Usage

pms(data, items, thresholds, misfit = FALSE, minRating = NULL)

Arguments

data

a numeric matrix of ordinal rating scale data whose entries are integers with missing data set to NA. Rows are persons and columns are items. The ordinal rating scale is assumed to go from the smallest to largest integer in integer steps unless minRating is specified (see Details).

items

a numeric vector of item measures with missing values set to NA. The length of items must equal the number of columns in data.

thresholds

a numeric vector of ordered rating category thresholds with no NA.

misfit

logical for calculating infit and outfit statistics. Default is FALSE.

minRating

integer representing the smallest ordinal rating category. Default is NULL (see Details).

Value

A list whose elements are:

person_measures

a vector of person measures for each person

person_std_errors

a vector of standard errors for the persons

infit_persons

if misfit = TRUE, a vector of infit statistics for the persons

outfit_persons

if misfit = TRUE, a vector of outfit statistics for the persons

Details

minRating must be specified if either the smallest or largest possible rating category is not in data (i.e., no person used one of the extreme rating categories). If minRating is specified, the ordinal rating scale is assumed to go from minRating to minRating + length(thresholds) in integer steps.

Examples

Run this code

# NOT RUN {
# Simple example with randomly generated values and lowest rating category = 0
d <- as.numeric(sample(0:4, 500, replace = TRUE))
dm <- matrix(d, nrow = 25, ncol = 20)
im <- runif(20, -2, 2)
th <- sort(runif(4, -2, 2))
pm <- pms(data = dm, items = im, thresholds = th, misfit = TRUE, minRating = 0)
# }