# NOT RUN {
data(examplegridtopography)
data(exampleinterpolationdata)
#Creates spatial topography points from the grid
p = 1:2
spt = as(examplegridtopography, "SpatialPointsTopography")[p]
#Interpolation of two points for the whole time period (2000-2003)
mp = interpolationpoints(exampleinterpolationdata, spt)
#PET sums by months
mp.sum = summarypoints(mp, var="PET", freq="months", fun=sum)
mp.sum
# }
Run the code above in your browser using DataLab