multivariate_ci: General a multivariate confidence interval for a set of...

In wjschne/WJSmisc: Miscellaneous functions from W. Joel Schneider

General a multivariate confidence interval for a set of scores

Description

General a multivariate confidence interval for a set of scores

Usage

multivariate_ci(x, rxx, mu, sigma, ci = 0.95, v_names = names(x))

Arguments

x	a vector of scores
rxx	a vector reliability coefficients
mu	a vector means
sigma	a covariance matrix
ci	confidence level
v_names	a vector of names

Value

data.frame

Examples

x_wisc <- c(
  vci = 130,
  vsi = 130,
  fri = 70,
  wmi = 130,
  psi = 130
)
rxx_wisc <- c(
  vci = .92,
  vsi = .92,
  fri = .93,
  wmi = .92,
  psi = .88
  )
R_wisc <- ("
  index	vci 	vsi 	fri 	wmi 	psi
  vci  	1.00	0.59	0.59	0.53	0.30
  vsi  	0.59	1.00	0.62	0.50	0.36
  fri  	0.59	0.62	1.00	0.53	0.31
  wmi  	0.53	0.50	0.53	1.00	0.36
  psi  	0.30	0.36	0.31	0.36	1.00") |>
    readr::read_tsv() |>
    tibble::column_to_rownames("index") |>
    as.matrix()
 multivariate_ci(
   x = x_wisc,
   rxx = rxx_wisc,
   mu = rep(100, 5),
   sigma = R_wisc * 225
 )

wjschne/WJSmisc documentation built on June 29, 2023, 8:04 a.m.