powered by
as.rectangle(...)
"owin"
as.owin
"rectangle"
w
xrange,yrange
Use the function bounding.box to compute the smallest bounding rectangle.
bounding.box
owin
w <- owin(c(0,10),c(0,10), poly=list(x=c(1,2,3,2,1), y=c(2,3,4,6,7))) r <- as.rectangle(w) # returns a 10 x 10 rectangle
Run the code above in your browser using DataLab