R: Exponential Penalty Matrix

exponpen {fda} | R Documentation

## Exponential Penalty Matrix

### Description

Computes the matrix defining the roughness penalty for functions expressed in terms of an exponential basis.

### Usage

    exponpen(basisobj, Lfdobj=int2Lfd(2))

### Arguments

`basisobj` | an exponential basis object.
`Lfdobj` | either a nonnegative integer or a linear differential operator object.

### Details

A roughness penalty for a function $x(t)$ is defined by integrating the square of either the derivative of $ x(t) $ or, more generally, the result of applying a linear differential operator $L$ to it. The most common roughness penalty is the integral of the square of the second derivative, and this is the default. To apply this roughness penalty, the matrix of inner products of the basis functions (possibly after applying the linear differential operator to them) defining this function is necessary. This function just calls the roughness penalty evaluation function specific to the basis involved.

### Value

a symmetric matrix of order equal to the number of basis functions defined by the exponential basis object. Each element is the inner product of two exponential basis functions after applying the derivative or linear differential operator defined by Lfdobj.

### See Also

`expon`, `eval.penalty`, `getbasispenalty`

### Examples

    #  set up an exponential basis with 3 basis functions
    ratevec  <- c(0, -1, -5)
    basisobj <- create.exponential.basis(c(0,1),3,ratevec)
    #  compute the 3 by 3 matrix of inner products of
    #  second derivatives
    penmat <- exponpen(basisobj)

[Package fda version 2.4.8 Index]