attime12: Epoch Time Window

In RSEIS: Seismic Time Series Analysis Tools

Epoch Time Window

Description

Set a time window in Epoch days for extraction from a DB file

Usage

attime12(t1, t2 = t1, origyr = 1972, pre = 0, post = 0)

Arguments

t1	list date-time 1
t2	list date-time 2
origyr	origin year
pre	seconds before time 1
post	seconds afer time 2

Details

If t2 is missing, t1=t2.

Value

vector

c(t1, t2)

Author(s)

Jonathan M. Lees<[e-mail]>

Examples

j1  <-  list(yr = 2005, jd= 214 , hr= 7 , mi= 1 ,sec= 0.5235)
j2  <-  list(yr=2005, jd= 214 , hr= 7 , mi= 1 ,sec= 0.5235+6)

at <-  attime12(j1, t2=j1, origyr=2005, pre=100, post=100)

### given an RSEIS format list
data(GH)
AT =  SEISNtime(GH)
ats = attime12(AT[[1]], t2 = AT[[2]],
   origyr =AT[[1]]$yr , pre = 0, post= 0)

RSEIS documentation built on Sept. 13, 2024, 1:09 a.m.