approx.Z: Approximation for semi-parametric splines

In gmonette/spida15: Collection of miscellaneous functions for mixed models etc. prepared for SPIDA 2009+ (development version)

Usage

approx.Z(Z, oldtimes, newtimes)

Arguments

Z
oldtimes
newtimes

Examples

##---- Should be DIRECTLY executable !! ----
##-- ==>  Define data, use random,
##--	or do  help(data=index)  for the standard data sets.

## The function is currently defined as
function (Z, oldtimes, newtimes) 
{
    oldt.u <- sort(unique(oldtimes))
    if (length(oldt.u) != length(oldtimes) || any(oldt.u != oldtimes)) {
        Z <- Z[match(oldt.u, oldtimes), ]
        oldtimes <- oldt.u
    }
    apply(Z, 2, function(u, oldt, newt) {
        approx(oldt, u, xout = newt)$y
    }, oldt = oldtimes, newt = newtimes)
  }

gmonette/spida15 documentation built on May 17, 2019, 7:26 a.m.