# NOT RUN {
# Read a single lat long point from a WTSS server
# Requires access to external service
wtss_cube <- sits_cube(
type = "WTSS",
URL = "http://www.esensing.dpi.inpe.br/wtss/",
name = "MOD13Q1"
)
point.tb <- sits_get_data(wtss_cube,
longitude = -55.50563,
latitude = -11.71557
)
plot(point.tb)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab