# NOT RUN {
library(sp)
library(rgeos)
data(meuse)
coordinates(meuse) <- ~x+y
e <- gConvexHull(meuse)
e30 <- rotate.polygon(e, angle=30, sp=TRUE)
plot(e, main="rotated 30 degrees")
plot(e30, add=TRUE)
# }
Run the code above in your browser using DataLab