# NOT RUN {
#' # Retrieve a time series with values of NDVI
data(point_ndvi)
# Filter the point using the Savitsky Golay smoother
point_sg.tb <- sits_sgolay (point_ndvi, order = 3, scale = 2)
# Plot the two points to see the smoothing effect
sits_plot(sits_merge(point_ndvi, point_sg.tb))
# }
Run the code above in your browser using DataLab