spline.E: Spline estimation function

Usage Arguments Examples

View source: R/gsp.R

Usage

1
spline.E(knots, degree, smooth, intercept = 0, signif = 3)

Arguments

knots
degree
smooth
intercept
signif

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
##---- 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 (knots, degree, smooth, intercept = 0, signif = 3) 
{
    cmat = Cmat(knots, degree, smooth, intercept, signif)
    emat = Emat(knots, degree, smooth, !is.null(intercept), signif)
    nc = nrow(cmat)
    ne = nrow(emat)
    basisT = t(basis(cbind(t(cmat), t(emat))))
    cols = attr(basisT, "cols")
    ncc = sum(cols <= nc)
    Tmat = solve(basisT)
    Tmat[, (ncc + 1):ncol(Tmat)]
  }

gmonette/spida documentation built on May 17, 2019, 7:25 a.m.