powered by
eba
residuals.eba(object, type = c("deviance", "pearson"), ...)
"deviance"
"pearson"
help(residuals.glm)
residuals.glm
plot.eba
data(celebrities) # absolute choice frequencies btl <- eba(celebrities) # fit BTL model sum( resid(btl)^2 ) # deviance sum( resid(btl, "pearson")^2 ) # Pearson chi2
Run the code above in your browser using DataLab