Setup plot extent for stereonet.

Description

Creates a standardized plot with predetermined extents and margins to used with other stereonet tools.

Usage

1
StereoPlot(my.title = "Stereonet", new = TRUE, pdf.file)

Arguments

my.title

Title of the stereonet plot.

new

Logical, if FALSE, new plot will open in active window.

pdf.file

The filename to plot stereonet as a pdf. If missing, windows() is used.

Value

Sets up a plot for stereographic projections.

Author(s)

Jeffrey R. Webber

References

Modified from the package RFOC by Jonathan M. Lees.

See Also

StereoCirc, StereoWeb, StereoPlane, StereoPoint

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
#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)
}