Description Usage Arguments Details Value See Also Examples
View source: R/feasible_point.R
feasible_point
will find a point in the interior of the intersection
of two or more fully specified ellipses. If the intersections is empty
NA
is returned.
1 | feasible_point(ell, ...)
|
ell |
a list of at least two (non degenerate) ellipses; see
|
... |
additional arguments to be passed to internal functions. |
feasible_point
will find a point in the interior of the intersection
of two or more fully specified ellipses ell
. If the intersections is
empty NA
is returned.
feasible_point
returns an object of class
"feasible_point
" with the following entries
x |
An interior point. |
distance |
A data.frame with the ellipse specific distances. |
optim |
The final internal optimization value. |
call |
The matched call. |
wrangle_ellipse
for detailed on ellipse
parameterization.
1 2 3 4 5 6 7 8 9 10 11 12 | # two dimensional ellipses
e1 <- list("c" = c(1,2), "P" = matrix(c(2,0,0,1), ncol = 2), "r" = 3)
e2 <- list("c" = c(0,0), "S" = matrix(c(1, 0.2, 0.2, 2), ncol = 2), "r" = 1)
# find point in intersection
feasible_point(list(e1, e2))
# make new ellipse
e3 <- list("c" = c(2,2), "P" = matrix(c(1,0,0,1), ncol = 2), "r" = 0.5)
# now there is no overlap
feasible_point(list(e1, e2, e3))
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.