travel.time1D | R Documentation |
Travel time from source to reciever in 1D local model.
travel.time1D(indelta, inhpz, instaz, inlay, ztop, vel)
many.time1D(indelta, inhpz, instaz, inlay, ztop, vel)
indelta |
distance in KM |
inhpz |
depth of hypocenter, km |
instaz |
elevation of station |
inlay |
number of layers |
ztop |
vector, tops of layers |
vel |
vector, velocities in layers |
Uses local 1D velocity model, not appropriate for spherical earth. The many.time1D version will take a vector of distances (indelta) and either one station elevation or a vector.
The station elevation should be referenced to the top of the velocity model, not necessarily sea level. Usually this is set to zero and a station correction is used to take into account the topographic and other geologic effects.
list:
dtdr |
derivative of t w.r.t. horizontal distance |
dtdz |
derivative of t w.r.t. z, depth |
angle |
incidence angle, degrees |
tt |
travel time, s |
Jonathan M. Lees<jonathan.lees.edu>
Ray.time1D, Get1Dvel
data(VELMOD1D)
v <- VELMOD1D
tees <- travel.time1D(23, 7, 0, length(v$zs) , v$zp , v$vp)
print(tees)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.