plotplanet: Plot a planet

In happynotes/RoundAndRound: Plot Objects Moving in Orbits

Description

Plot a planet

Usage

plotplanet(orig = c(0, 0), rad = 1, theta = 0,
  fun = graphics::lines, cols = "gray", ab = 1, arrow = TRUE,
  arrow.len = 0.1, ...)

Arguments

orig	Origin
rad	Radius of the planet
theta	Angle of the Arrow inside of the planet
fun	Function to plot the planet
cols	Color of planet and arrow.
ab	Semi-major over semi-minor. ab=1 for the planet
arrow	Whether plot the arrow.
arrow.len	Length in arrow function.
...	More options in plot function.

Examples

a = 10;
ab=1.5
x1=PCS2CCS(a=a, ab=ab)
c1 = ab2c(a=a, ab=ab)
plot(x1, type='l', xlim=c(-10,10), ylim=c(-10,10), asp=1, col='gray')
Arrow.pcs(theta = 1:12 * 30, r1=0, r2=a, ab1=ab, length=.1, col=2, o1 = c(c1,0), o2=c(0,0))
pos = PCS2CCS(theta = 1:12 * 30, a=a, ab=ab)
plotplanet(orig = pos, arrow.len=0.1)

happynotes/RoundAndRound documentation built on Jan. 31, 2020, 12:05 p.m.