approx.Z: Approximation for semi-parametric splines

Usage Arguments Examples

View source: R/gsp.R

Usage

1
approx.Z(Z, oldtimes, newtimes)

Arguments

Z
oldtimes
newtimes

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
##---- 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 14, 2017, 1:02 p.m.