Stereographic projection of faults

Visualization of faults (planes and lines) in a stereographic projection.

Usage

stereo_fault(
  x,
  hoeppner = FALSE,
  greatcirles = TRUE,
  pch = 16,
  col = 1,
  lwd = 1,
  lty = 1,
  lab = NULL,
  cex = 1,
  text.pos = 4,
  upper.hem = FALSE,
  earea = TRUE,
  ...
)

Arguments

x

Object of class "fault"

hoeppner

logical. TRUE for Hoeppner plot

greatcirles

logical. Whether greatcircles are displayed (TRUE, the default) or poles to planes (FALSE)

pch, col, lwd, lty

plotting parameters for planes and lines

lab

character. text labels

cex

character expansion of labels

text.pos

position for labels

upper.hem

logical. Whether the projection is shown for upper hemisphere (TRUE) or lower hemisphere (FALSE, the default).

earea

logical TRUE for Lambert equal-area projection (also "Schmidt net"; the default), or FALSE for meridional stereographic projection (also "Wulff net" or "Stereonet").

...

optional graphical parameters

Note

"plane" objects will be displayed as pole to the plane.

Examples

faults <- Fault(
  c(0, 90, 180, 270),
  c(80, 45, 80, 45),
  c(0, 170, 180, 315),
  c(80, 10, 80, 36),
  c(1, -1, 0, 1)
)
stereoplot()
stereo_fault(faults, col = 1:4)
# stereo_fault(faults, col =1:4, hoeppner = TRUE)
legend("bottomright", c("normal", "thrust", "unknown", "normal"), fill = 1:4)