hudson.net: Hudson Net Plot

Description Usage Arguments Details Value Author(s) References See Also Examples

Description

Plot a Hudson plot as preparation for plotting T-k values for focal mechanisms.

Usage

1
2
hudson.net(add = FALSE, POINTS = TRUE, TEXT = TRUE,
     colint = "grey", colext = "black")

Arguments

add

logical, TRUE=add to existing plot

POINTS

logical, TRUE=add points

TEXT

logical, TRUE=add points

colint

color for interior lines

colext

color for exterior lines

Details

Draws a T-k plot for moment tensors

Value

Graphical Side effects

Author(s)

Jonathan M. Lees<jonathan.lees@unc.edu>

References

Hudson, J.A., Pearce, R.G. and Rogers, R.M., 1989. Source time plot for inversion of the moment tensor, J. Geophys. Res., 94(B1), 765-774.

See Also

hudson.plot

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
hudson.net()

Mtens <- c(-0.412, 0.084, 0.328 ,0.398, -1.239, 1.058)

M1 <-  matrix(c(Mtens[1], Mtens[4], Mtens[5], Mtens[4],
Mtens[2], Mtens[6], Mtens[5],Mtens[6], Mtens[3]), ncol=3, nrow=3,
byrow=TRUE)

E1 <-  eigen(M1)

hudson.plot(E1$values)

RFOC documentation built on May 2, 2019, 1:38 p.m.