How to fit a model I built to another data set and get residuals?

Question

I fitted a mixed model to Data A as follows:

model <- lme(Y~1+X1+X2+X3, random=~1|Class, method=\"ML\", data=A)

Next, I want to see how

Answer 1

You model:

model <- lme(Y~1+X1+X2+X3, random=~1|Class, method="ML", data=A)

2 predictions based on your model:

pred1=predict(model,newdata=A,type='response')
pred2=predict(model,newdata=B,type='response')

missed: A function that calculates the percent of false positives, with cut-off set to 0.5.
(predicted true but in reality those observations were not positive)

missed = function(values,prediction){sum(((prediction > 0.5)*1) != values)/length(values)}

missed(A,pred1)
missed(B,pred2)