R/spline.apply.r

spline.apply <- function(k,cond.cop.apply,y,xout) {
  return(spline(x=cond.cop.apply[,k],y=y,xout=xout[k])$y)
}

Try the penDvine package in your browser

Any scripts or data that you put into this service are public.

penDvine documentation built on May 2, 2019, 1:06 p.m.