Cronbach (1951) coefficient alpha
Examples
M <- matrix(c(1, 2, 3, 4, 5, 6), nrow = 2)
CttAlpha(M)
#> $alpha
#> [1] 1
#>
#> $estimate
#> [1] 1
#>
#> $item_var
#> [1] 0.5 0.5 0.5
#>
#> $sum_item_var
#> [1] 1.5
#>
#> $total_var
#> [1] 4.5
#>
#> $n_items
#> [1] 3
#>
#> $n
#> [1] 2
#>
#> $method
#> [1] "Cronbach (1951) alpha = k/(k-1) (1 - sum V_i / V_t)"
#>
