WINRPACK-package {WINRPACK} | R Documentation |
Package reads in WIN format data from Japan and converts to R
Package: | WINRPACK |
Type: | Package |
Version: | 1.0-8 |
Date: | 2008-04-25 |
License: | GPL |
Jonathan M. Lees<jonathan.lees@unc.edu> Maintainer:Jonathan M. Lees<jonathan.lees@unc.edu>
RSEIS, Rsac
## Not run: ### this example will run in the inst/doc folder of this distribution ### set the pick file winpick = "970723.235151.840" ### read in the pick file zip = get1WINPICK(winpick) fn = zip$winID1 chans = readwinch(fn) m1 = match(zip$STA$name, chans$sta) zip$STA$lat = chans$lat[m1] zip$STA$lon = chans$lon[m1] zip$STA$z = chans$z[m1] ## read in the waveform data JH = XWINdata(fn, stasel=NULL, PLOT=FALSE) require(RSEIS) ### prepare the structure for RSEIS KH = prepSEIS(JH) w1 = which(KH$COMPS=="V") ### plot in RSEIS PICK.GEN(KH, sel = w1, SHOWONLY =TRUE ) ## End(Not run)