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