Learn R Programming

TauP.R (version 1.0)

FindDist4p: Epicentral Distance

Description

Calculates epicentral distance given focal depth and ray parameter or takeoff angle

Usage

FindDist4p(phase, h, model, p, takeoff)

Arguments

phase
Phase of arrival (e.g. 'P', 'pS')
h
Focal depth (km)
model
Planet model
p
Ray parameter (s/deg)
takeoff
Takeoff angle (deg)

Value

  • List including the following elements:
  • distVector of surface distances traveled (deg), corresponding to the values in 'p' or 'takeoff'
  • segxList of vectors corresponding to 'p' or 'takeoff'. Each vector includes distance coordinates (deg) along the ray path.
  • segzList of vectors corresponding to 'p' or 'takeoff'. Each vector includes depth coordinates (km) along the ray path.
  • segtypList of vectors corresponding to 'p' or 'takeoff'. Each vector includes wave type ('P' or 'S') for each segment in the ray. Note that vectors in 'segtyp' have one fewer element than vectors in 'segx' and 'segz' because they describe segments, not points.
  • respVector of ray parameters for each ray (s/deg).

Details

Only one of 'p', 'takeoff' needs to be specified, and may be a vector. 'phase' and 'h' must be scalars.

See Also

Traveltime, FindTime4p

Examples

Run this code
data(model)

FindDist4p('SKKS',100,model,c(4,5))

Run the code above in your browser using DataLab