R/f_s3_rendocopulacorrection.R
predict.rendo.copula.correction.Rd
Predicted values based on linear models with endogenous regressors estimated using the gaussian copula.
# S3 method for class 'rendo.copula.correction'
predict(object, newdata, ...)
predict.copula.correction
produces a vector of predictions
The model fitting function copulaCorrection
# \donttest{
if (FALSE) { # \dontrun{
data("dataCopCont")
c1 <- copulaCorrection(y~X1+X2+P|continuous(P), num.boots=10,
data=dataCopCont)
# returns the fitted values
predict(c1)
# using the data used for fitting also for predicting,
# correctly results in fitted values
all.equal(predict(c1, dataCopCont), fitted(c1)) # TRUE
} # }# }