Find Largest Circle Inside Window
Find the largest circle contained in a given window.
incircle(W) inradius(W)
W |
A window (object of class |
Given a window W of any type and shape,
the function incircle determines the largest circle
that is contained inside W, while inradius computes its
radius only.
For non-rectangular windows, the incircle is computed approximately
by finding the maximum of the distance map (see
distmap) of the complement of the window.
The result of incircle is
a list with entries x,y,r giving the location (x,y)
and radius r of the incircle.
The result of inradius is the numerical value of radius.
Adrian Baddeley Adrian.Baddeley@curtin.edu.au
and Rolf Turner r.turner@auckland.ac.nz
W <- square(1) Wc <- incircle(W) plot(W) plot(disc(Wc$r, c(Wc$x, Wc$y)), add=TRUE) plot(letterR) Rc <- incircle(letterR) plot(disc(Rc$r, c(Rc$x, Rc$y)), add=TRUE) W <- as.mask(letterR) plot(W) Rc <- incircle(W) plot(disc(Rc$r, c(Rc$x, Rc$y)), add=TRUE)
Please choose more modern alternatives, such as Google Chrome or Mozilla Firefox.