# NOT RUN {
# Retrieve a time series with values of NDVI
point_ndvi <- sits_select(point_mt_6bands, bands = "NDVI")
# find out how many time instances are there
n_times <- nrow(sits_time_series(point_ndvi))
# interpolate three times more points
point_int.tb <- sits_interp(point_ndvi, fun = stats::spline, n = 3 * n_times)
# plot the result
plot(point_int.tb)
# }
Run the code above in your browser using DataLab