Return the group PCCs of the specified model

Return the group PCCs of the specified model

Usage

group_pccs(m)

Arguments

m

an object of class "opafit"

Value

a numeric vector

Examples

dat <- data.frame(t1 = c(9, 4, 8, 10),
                  t2 = c(8, 8, 12, 10),
                  t3 = c(8, 5, 10, 11))
h <- hypothesis(1:3)
opamod <- opa(dat, h)
group_pccs(opamod)
#> [1] 50