For data without Don't Know, chi-square goodness of fit between true and model based multivariate distribution
fit_nodk(pre_test, pst_test, g, est.param)
pre_test | data.frame carrying pre_test items |
---|---|
pst_test | data.frame carrying pst_test items |
g | estimates of \(\gamma\) produced from |
est.param | estimated parameters produced from |
matrix with two rows: top row carrying chi-square value, and bottom row probability of observing that value
fit_nodk
# NOT RUN { fit_nodk(pre_test, pst_test, g, est.param) # }