Sequentially view data that has been picked previously using GPIX or PPIX and stored as wpx files.
chak(DBnov, gstas, gcomps, fn, stas, vel, kind = 2, Iendian = 1, BIGLONG = FALSE)
RSEIS data base
stations to extract
components to extract
wpx file name
station list
1D velocity model
kind of data, 0=nativeR, 1=segy, 2=sac
endian
big long or short long
Pickfile
Program is used for detailed picking. A wpx list exists and is read into memory, then the data is extracted from the disk, plotted with swig.
viewCHAC
# NOT RUN {
# }
# NOT RUN {
lf = list.files(path="/Users/lees/Site/CHAC/PIX", pattern=".RDATA", full.names=TRUE)
for(i in 1:length(lf))
{
fn = lf[i]
ret = chak(DBnov , gstas, gcomps , fn, stas, kind=2, Iendian=1, BIGLONG=FALSE)
if(ret$but == "QUIT") break
}
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab