Fill with "linear approximation"

Fill with "linear approximation"

fill_linear(body, idx, ...)

Arguments

body	[numeric vector] The body of the vector.
idx	[integer vector] the index to replace with.
...	Further arguments passed to \link[stats]{approx}

Value

Returns a vector with the same class and attributes as the input vector.

Examples

x <- c(5,3,2,2,5)
xlen <- length(x)
n <- 2
n <- pmin(n, xlen)
idx <- 1:n
body <- x[seq_len(xlen - n)]
fill_linear(body, idx)
#> [1] 5 5