Arrow.pcs {RoundAndRound}

Add arrows in Polar Coordinate System

Description

Add arrows in Polar Coordinate System

Usage

Arrow.pcs(theta, r1 = 0, r2 = 1e+06, o1 = c(0, 0), o2 = o1,
  ab1 = 1, ab2 = ab1, ...)

Arguments

theta

Angle in polar coordinate system

r1, r2

Radius of start and end points of the arrow.

o1, o2

Origin

ab1, ab2

Semi-major over semi-minor. ab=1 for a Ring.

...

More options for graphics::arrows function.

Examples

x1=PCS2CCS(a=10, ab=1.5)
c1 = ab2c(a=10, ab=1.5)
plot(x1, type='n', xlim=c(-10,10), ylim=c(-10,10), asp=1)
abline(h=0, v=0, asp=1, lty=2)
graphics::lines(x1, col=2);
points(c1, 0, col=2) # focus
Arrow.pcs(theta = 1:12 * 30, r1=0, r2=10, ab1=1.5, length=.1, col=2, o1 = c(c1,0), o2=c(0,0))