distseisnXY: Distances from an RSEIS list

View source: R/distseisnXY.R

distseisnXYR Documentation

Distances from an RSEIS list

Description

Calculate euclidian distances from an RSEIS seismic data list, stations and event location.

Usage

distseisnXY(GH, sta=list(nam="", x=0 , y=0 , z=0) , LOC=list(x=0, y=0 , z=0))

Arguments

GH

Rseis list structure

sta

station list(x,y,z)

LOC

location list(x,y,z)

Value

d

vector of distances in km, matching the stations in the RSEIS list.

Note

Locations of stations and source should be projected.

Author(s)

Jonathan M. Lees<jonathan.lees@unc.edu>

Examples


data(GH)
###   assume the lat lon in GH are x, y (projected)

staxy <-  list(nam=GH$stafile$name, x=GH$stafile$lon,
               y=GH$stafile$lat, z=GH$stafile$z)
 LOC <- list(x=GH$pickfile$LOC$lon, y=GH$pickfile$LOC$lat,
             z=GH$pickfile$LOC$z)
distseisnXY(GH, sta =staxy, LOC = LOC)




RSEIS documentation built on Aug. 19, 2023, 5:07 p.m.