ellipse: Generate ellipse boundaries

Description Usage Arguments Examples

View source: R/sourceFunction.R

Description

Generate general ellipse boundaries with semidiameteres a and b, centered at (r0, theta0), with the a axis rotated by phi relative to the polar axis.

Usage

1
ellipse(a, b, r0 = 0, theta0 = 0, phi = 0)

Arguments

a, b

semidiameter parameters where a > b

r0, theta0

the polar form of the center of the ellipse

phi

the angle rotated by the major axis

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
gamma.fun = ellipse(a = 0.35, b = 0.25)
theta.plot = seq(from = 0, to = 2*pi, length.out = 200)
require(plotrix)
my.radial <- function(r, theta, ...){
  radial.plot(c(r[order(theta)]), c(theta[order(theta)]),
              rp.type = "p", show.grid.label = TRUE, radial.lim = c(0, 0.5),
              ...)
}
my.radial(gamma.fun(theta.plot), theta.plot, main = 'Ellipse boundary',
          line.col = 1, lty = 2, lwd = 2, show.grid = FALSE)

xylimeng/BayesBD documentation built on May 28, 2017, 8:34 a.m.