fill.fwd(x) fill.bwd(x) fill.value(x,value)
x <- fts(rnorm(50)) x[x > 0,] <- NA fill.fwd(x) x <- fts(rnorm(50)) x[x > 0,] <- NA fill.bwd(x) x <- fts(rnorm(50)) x[x > 0,] <- NA fill.value(x,100.0)
Run the code above in your browser using DataLab