summary(dataqall)
summary(dataq)
is.numeric(dataqall$response)
as.numeric(dataqall$response)
as.numeric(as.character(dataqall$response))
summary(dataqall)
summary(dataq)
summary(data)
cd.means
q()
q()
q()
modelv1
hpd.modelv1
hpd.modelpostV1
hpd.modelpostv1
q()
q()
head(data.ab.crit)
ab.ci
ab.ci
abci.lower
abci.lower
cdci.lower
cfci.lower
cdci.lower
q()
hpd.modelV1
hpd.modelv1
hpd.modelpostv1
ab.means
q()
head(crit.data)
q()
n
