RFOC (version 3.2)

hudson.net: Hudson Net Plot

Description

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

Usage

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

Value

• Graphical Side effects

Details

Draws a T-k plot for moment tensors

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

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)