https://github.com/cran/fields
Revision 0e015763c23043fc79b36e20177cde5e8b4eb092 authored by Doug Nychka on 06 July 2010, 19:17:12 UTC, committed by cran-robot on 06 July 2010, 19:17:12 UTC
1 parent 8eab500
Raw File
Tip revision: 0e015763c23043fc79b36e20177cde5e8b4eb092 authored by Doug Nychka on 06 July 2010, 19:17:12 UTC
version 6.3
Tip revision: 0e01576
predict.sreg.R
# fields, Tools for spatial data
# Copyright 2004-2007, Institute for Mathematics Applied Geosciences
# University Corporation for Atmospheric Research
# Licensed under the GPL -- www.gpl.org/licenses/gpl.html
"predict.sreg" <- function(object, x, derivative = 0, 
    model = 1, ...) {
    if (missing(x)) {
        x <- object$x
    }
    c(splint(object$predicted$x, object$predicted$y[, model], 
        x, derivative = derivative, ...))
}
back to top