# Prerequisite: Create Time series with missing values
x <- ts(c(2, 3, 4, 5, 6, NA, 7, 8))
# Example 1: Perform linear interpolation
na_interpolation(x)
# Example 2: Perform spline interpolation
na_interpolation(x, option = "spline")
# Example 3: Perform stine interpolation
na_interpolation(x, option = "stine")
# Example 4: Same as example 1, just written with pipe operator
x %>% na_interpolation()
# Example 5: Same as example 2, just written with pipe operator
x %>% na_interpolation(option = "spline")
Run the code above in your browser using DataLab