# NOT RUN {
# fill NA values
lai.new <- smooth.time.series(lai)
# Smooth time-series with a relaxed smoothing parameter
lai.smooth <- smooth.time.series(lai, f = 0.2, smooth.data = TRUE)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab