rwg.j: James et al., (1984) agreement index for multi-item scales

In multilevel: Multilevel Functions

James et al., (1984) agreement index for multi-item scales

Description

Calculates the within group agreement measure rwg(j) for multiple item measures as described in James, Demaree and Wolf (1984). James et al. (1984) recommend truncating the Observed Group Variance to the Expected Random Variance in cases where the Observed Group Variance was larger than the Expected Random Variance. This truncation results in an rwg.j value of 0 (no agreement) for groups with large variances.

Usage

rwg.j(x, grpid, ranvar=2)

Arguments

x	A matrix representing the scale items. Each column of the matrix represents a separate item, and each row represents an individual respondent.
grpid	A vector identifying the group from which x originated.
ranvar	The random variance to which actual group variances are compared. The value of 2 represents the variance from a rectangular distribution in the case where there are 5 response options (e.g., Strongly Disagree, Disagree, Neither, Agree, Strongly Agree). In cases where there are not 5 response options, the rectangular distribution is estimated using the formula ranvar=(A^2-1)/12 where A is the number of response options. While the rectangular distribution is widely used, other random values may be more appropriate.

Value

grpid	The group identifier
rwg.j	The rwg(j) estimate for the group
gsize	The group size

Author(s)

Paul Bliese [e-mail]

References

Bliese, P. D. (2000). Within-group agreement, non-independence, and reliability: Implications for data aggregation and analysis. In K. J. Klein & S. W. Kozlowski (Eds.), Multilevel Theory, Research, and Methods in Organizations (pp. 349-381). San Francisco, CA: Jossey-Bass, Inc.

James, L.R., Demaree, R.G., & Wolf, G. (1984). Estimating within-group interrater reliability with and without response bias. Journal of Applied Psychology, 69, 85-98.

See Also

ad.m awg rwg rgr.agree rwg.j.lindell rwg.j.sim

Examples

data(lq2002)
RWGOUT<-rwg.j(lq2002[,3:13],lq2002$COMPID)
RWGOUT[1:10,]
summary(RWGOUT)

multilevel documentation built on March 18, 2022, 5:47 p.m.