# incircle

From spatstat v1.63-3
by Adrian Baddeley

##### Find Largest Circle Inside Window

Find the largest circle contained in a given window.

##### Usage

`incircle(W)`inradius(W)

##### Arguments

- W
A window (object of class

`"owin"`

).

##### Details

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.

##### Value

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.

##### See Also

##### Examples

```
# NOT RUN {
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)
# }
```

*Documentation reproduced from package spatstat, version 1.63-3, License: GPL (>= 2)*

### Community examples

Looks like there are no examples yet.