getRelBySpearmanBrown: Function using the Spearman-Brown formula to predict...

View source: R/getRelBySpearmanBrown.R

getRelBySpearmanBrownR Documentation

Function using the Spearman-Brown formula to predict reliability for new length or get length for desired reliability

Description

Function using the Spearman-Brown formula to predict reliability for new length or get length for desired reliability

Usage

getRelBySpearmanBrown(
  oldRel,
  lengthRatio = NULL,
  newRel = NULL,
  verbose = TRUE
)

Arguments

oldRel

numeric: the reliability you have

lengthRatio

numeric: the ratio of the new length to the old length

newRel

numeric: the desired reliability

verbose

logical: whether to give messages explaining the function

Value

numeric: either predicted reliability or desired length ratio (whichever was input as NULL)

background

This is ancient psychometrics but still of some use. It has been checked against two functions in the psychometric package with gratitude. For more information, see:

https://www.psyctc.org/Rblog/posts/2021-04-09-spearman-brown-formula/


The formula is simple:

\loadmathjax \mjdeqn\rho

^*=\fracn\rho1 + (n-1)\rho

The short summary is that any multi-item measure will have overall internal reliability/consistency that is a function of the mean inter-item correlations and the number of items and, for any mean inter-item correlation, a longer measure will have a higher reliability. The formula for the relationship was published separately by both Spearman in 1910 and in the same year by Brown, who was working for Karl Pearson, who had a running feud with Spearman. See:

https://en.wikipedia.org/wiki/Spearman%E2%80%93Brown_prediction_formula#History


That also gives some arguments that the formula should really be termed the Brown-Spearman formula but I am bowing to historical precedent here.

History/development log

Started before 5.iv.21, updated help page 10.iv.21.

Author(s)

Chris Evans

Examples

## Not run: 
### if you had a reliability of .8 from a measure of, say 10, items,
###   what reliability might you expect from one of 34 items?
getRelBySpearmanBrown(.8, 3.4)

### if you had a reliability of .7 from 10 items how much lower
###  would you expect the reliability to be from a measure of only 5 items?
### from examples for psychometric::SBrel() with respect and gratitude!
getRelBySpearmanBrown(.7, .5, verbose = FALSE)

### if you have a reliability of .7, how much longer a measure do you expect
###    to need for a reliability of .9?
###    again with acknowledgement to psychometric::SBlength() with respect and gratitude!
getRelBySpearmanBrown(.7, lengthRatio = NULL, .9)

## End(Not run)


cpsyctc/CECPfuns documentation built on April 2, 2024, 2:03 a.m.