hudson.plot {RFOC}

Hudson Source Type Plot

Description

Hudson Source Type Plot

Usage

hudson.plot(m, col = "red", pch = 21, lwd = 2, cex = 1, bg="white")

Arguments

m

vector of eigen values, sorted

col

color

pch

plotting char

lwd

line width

cex

character expansion

bg

background color for filled symbols

Details

Add to existing Hudson net

Value

Side effects

Author(s)

Jonathan M. Lees<[e-mail]>

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.net

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)