StereoCirc {RockFab}

Primitive circle plotter for stereonet.

Description

This function simply adds a primitive circle to an existing plot and is used in coordination with other stereonet plotting tools.

Usage

StereoCirc(n.seg = 360)

Arguments

n.seg

The number of segments to use in circle plot. Defaults to 360.

Value

Adds primitive circle to open plot.

Author(s)

Jeffrey R. Webber

References

Modified from the package RFOC by Jonathan M. Lees.

See Also

StereoPlot, StereoWeb, StereoPlane, StereoPoint

Examples

#Plot random plane and lineation
strike <- runif(min = 0, max = 360, n = 1)
dip <- runif(min = 0, max = 90, n = 1)
trend <- runif(min = 0, max = 360, n = 1)
plunge <- runif(min = 0, max = 90, n = 1)

if(interactive()){
  StereoPlot(my.title = "Example Stereonet")
  StereoWeb()
  StereoCirc()
  StereoPoint(my.az = trend, my.inc = plunge)
  StereoPlane(my.strike = strike, my.dip = dip)
}