Fill with "Next observation carried backwards"

Fill with "Next observation carried backwards"

fill_nocb(body, idx, fail = NA)

Arguments

body	[numeric vector] The body of the vector.
idx	[integer vector] the index to replace with.
fail	[numeric(1) or numeric vector: fill] In case it fails to fill some values.

Value

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

Examples

x <- c(5,3,2,2,5)
leadx(x, n = 2, fill = fill_locf)
#> [1] 2 2 5 5 5

xlen <- length(x)
n <- 2
n <- pmin(n, xlen)
idx <- (xlen - n + 1):xlen
body <- x[-seq_len(n)]
fill_nocb(body, idx, NA)
#> [1] NA NA
fill_both(body, idx, order = "nocb")
#> Error in fill_both(body, idx, order = "nocb"): could not find function "fill_both"