getSeed {kequate}

Retrieve the Standard Errors of the Difference Between Two Equatings

Description

Function to retrieve the standard error of the difference between an equipercentile equating and a linear equating from an object of class keout created by kequate.

Usage

getSeed(object)

Arguments

object

An object of class keout as created by the function kequate.

Value

An object of class genseed containing the difference between an equipercentile and a linear equating and the standard errors of the difference between an equipercentile equating and a linear equating.

Author(s)

[e-mail]
[e-mail]
[e-mail]

See Also

kequate, genseed

Examples

P<-c(5, 20, 35, 25, 15)
Q<-c(10, 30, 30, 20, 10)
x<-0:4
glmx<-glm(P~I(x)+I(x^2), family="poisson", x=TRUE)
glmy<-glm(Q~I(x)+I(x^2), family="poisson", x=TRUE)
keEG<-kequate("EG", 0:4, 0:4, glmx, glmy)
keEGseed<-getSeed(keEG)
plot(keEGseed)