R/predictdf.smooth.spline.R

#' predictdf.smooth.spline
#' @keywords internal
#' @noRd

predictdf.smooth.spline <- function(model, xseq, se, level) {
  pred <- predict(model, xseq)
  data.frame(x = xseq, y = pred$y)
}
damonbayer/damonmbayer documentation built on June 28, 2019, 11:18 p.m.