https://github.com/cran/pracma
Raw File
Tip revision: 0e3ae6b4108dcce6052c1e366d66aa83f8502596 authored by HwB on 10 January 2013, 00:00:00 UTC
version 1.3.8
Tip revision: 0e3ae6b
interp1.R
##
##  i n t e r p 1 . R Test suite
##


interp1 <- pracma::interp1

x <- c(0.0, 0.5, 1.0, 1.5)
y <- x^2
xi <- c(0.25, 0.75, 1.25)

identical(interp1(x, y, xi, method="constant"), c(0.0, 0.25, 1.0))
identical(interp1(x, y, xi, method="linear"),   c(0.125, 0.625, 1.625))
identical(interp1(x, y, xi, method="nearest"),  c(0.25, 1.00, 2.25))
identical(interp1(x, y, xi, method="spline"),   c(0.0625, 0.5625, 1.5625))

# Not yet implemented
# identical(interp1(x, y, xi, method="cubic"),    c(0.0781, 0.5547, 1.5547))
back to top