XYSETUP | R Documentation |
Set up matrix for hypocenter inversion
XYSETUP(STAS, init, vel)
STAS |
station information from pickfile |
init |
initial event location |
vel |
list, velocity |
This sets up the matrix used for nonlinear inversion. The code does not include information on the weighting. Station corrections are included.
The STAS are an internal component of the pickfile.
matrix
Need scheme for weighting according to errors in picks and distance weighting.
Jonathan M. Lees<jonathan.lees@unc.edu>
setPROJ, GLOB.XY,NLSlocate
## start with the location of the closest station
data(GH, package='RSEIS')
g1 = GH$pickfile
data(VELMOD1D, package='RSEIS')
vel= VELMOD1D
STAS = GH$pickfile$STAS
w1 = STAS$phase == 'P'
initz = 6
t0a = GH$pickfile$LOC$sec
XY = XYSETUP(STAS, c(STAS$lat[w1],STAS$lon[w1], initz, STAS$sec[w1]-t0a ) , vel )
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.