Extract fitted values from a kdecop() fits.

Simply calls predict(object, object$udata, what).

# S3 method for kdecopula
fitted(object, what = "pdf", ...)

Arguments

object	an object of class kdecopula.
what	what to predict, one of c("pdf", "cdf", "hfunc1", "hfunc2", "hinv1", "hinv2").
...	unused.

See also

predict.kdecopula()

Examples

data(wdbc)
udat <- apply(wdbc[, -1], 2, function(x) rank(x) / (length(x) + 1))
fit <- kdecop(udat[, 5:6])

all.equal(fitted(fit), predict(fit, fit$udata))
#> [1] TRUE