# NOT RUN {
# load required data
data(cont_ls)
# convert data to object of class winmove
cont_ls <- new("winmove", cont_ls)
# aggregate using a circular window with radius 3
d <- mean(cont_ls, d = 3, type = "circle")
# }
Run the code above in your browser using DataLab