StereoWeb {RockFab}

Equal area stereonet grid plotter.

Description

Creates an equal-area net to existing stereographic projection.

Usage

StereoWeb()

Value

Plots an equal-area net to existing stereographic projection with 10 degree cells.

Author(s)

Jeffrey R. Webber

References

Modified from the package RFOC by Jonathan M. Lees.

See Also

StereoPlot, StereoCirc, 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)
}