truncateTime: Function to truncate time in functional data

In FDboost: Boosting Functional Regression Models

Function to truncate time in functional data

Description

Function to truncate time in functional data

Usage

truncateTime(funVar, time, newtime, data)

Arguments

funVar	names of functional variables that should be truncated
time	name of time variable
newtime	new time vector that should be used. Must be part of the old time-line.
data	list containing all the data

Value

A list with the data containing all variables of the original dataset with the variables of funVar truncated according to newtime.

Note

All variables that are not part if funVar, or time are simply copied into the new data list

Examples

if(require(fda)){
  dat <- fda::growth
  dat$hgtm <- t(dat$hgtm[,1:10])
  dat$hgtf <- t(dat$hgtf[,1:10])
  
  ## only use time-points 1:16 of variable age
  datTr <- truncateTime(funVar=c("hgtm","hgtf"), time="age", newtime=1:16, data=dat)
  
  
  oldpar <- par(mfrow=c(1,2))
  with(dat, funplot(age, hgtm, main="Original data"))
  with(datTr, funplot(age, hgtm, main="Yearly data"))
  par(mfrow=c(1,1))   
  par(oldpar)
  
}

FDboost documentation built on Aug. 12, 2023, 5:13 p.m.