# NOT RUN {
w <- owin(c(0,1),c(0,1))
v <- rotate(w, pi/3)
e <- rotate(w, pi/2, centre="midpoint")
# }
# NOT RUN {
plot(v)
# }
# NOT RUN {
w <- as.mask(letterR)
v <- rotate(w, pi/5)
# }
Run the code above in your browser using DataLab