The function evaluates the penalty term for Akaike Information Criterion.
This routine is typically not called directly by the user; its name can be passed as an argument to features.
Usage
aic.penalty(n, n.param, ...)
Value
The penalty term \(2 \times \code{n.param}\).
Arguments
n
The number of observations.
n.param
The number of parameters in the model for which the penalty is evaluated.
#*** a simple example how to use the AIC penaltyx <- rnorm(300) + c(rep(1,50),rep(0,250))
w <- not(x)
w.cpt <- features(w, penalty="aic")
w.cpt$cpt[[1]]