This function contains various measures to assess the model's goodness of fit.
Usage
gof(obs, fit, methods=c("FT"), p.out=FALSE)
Arguments
obs
A vector containing the observed values.
fit
A vector containing the fitted values.
methods
A character vector containing one or many of the following methods:
"FT"
Freeman-Tukey Residuals. This is the default test.
"Chisq"
Pearson's Chi-squared test.
"KL"
Symmetrised Kullback-Leibler divergence [1].
p.out
Boolean. Decides whether or not to display plots (on corresponding methods).
References
Gonzalez, J. (2014). SNSequate: Standard and Nonstandard Statistical Models and Methods for Test
Equating. Journal of Statistical Software, 59(7), 1-30.
Kolen, M., and Brennan, R. (2004). Test Equating, Scaling and Linking.
New York, NY: Springer-Verlag.
# NOT RUN {data(Math20EG)
mod <- ker.eq(scores=Math20EG,kert="gauss",degree=c(2,3),design="EG")
gof(Math20EG[,1], mod$rj*mod$nx, method=c("FT", "KL"))
# }