Finds representative (prototype) and atypical (criticism) observations
using the Maximum Mean Discrepancy (MMD) framework on FPCA scores.
Usage
fregre.prototype(model, ncomp, n.prototypes = 5, n.criticisms = 5)
Arguments
- model
A fitted fregre.lm or fregre.logistic model
(uses its FPCA scores).
- ncomp
Number of components to use.
- n.prototypes
Number of prototypes (default 5).
- n.criticisms
Number of criticisms (default 5).
Value
A list with prototypes (indices), prototype_witness,
criticisms (indices), criticism_witness, and bandwidth.
Examples
# \donttest{
fd <- fdata(matrix(rnorm(500), nrow = 50), argvals = seq(0, 1, length.out = 10))
y <- rnorm(50)
fit <- fregre.lm(fd, y, ncomp = 3)
result <- fregre.prototype(fit, ncomp = 3)
# }