R/predict.msc.slm.R

In msr: Morse-Smale Approximation, Regression and Visualization

Defines functions predict.msc.slm

Documented in predict.msc.slm

predict.msc.slm <- function (object, newdata, ...) {
    ms = object$ms
    x <- model.matrix(ms, newdata)
    mm <- model.matrix(object, x)
    mm %*% object$slm[[ms$predictLevel]]$lm$coefficients    
}

Try the msr package in your browser