data(sunspots)
ES = prep1wig(wig=sunspots, dt=1/12, sta="STA", comp="CMP", units="UNITS" )
EH=prepSEIS(ES)
STDLAB = c("DONE", "zoom out", "refresh", "restore", "XTR", "SPEC", "SGRAM" ,"WLET")
xx = PICK.GEN( EH, STDLAB = STDLAB)
###### this example shows how to read data from SEGY files using Rsac
##### and entering RSEIS
KG4 = JGET.seis(c(fnames), kind = 1, PLOT = FALSE)
KH=prepSEIS(KG4)
STDLAB = c("DONE", "zoom out", "refresh", "restore", "XTR", "SPEC", "SGRAM" ,"WLET")
xx = PICK.GEN( KH, sel=which(KH$COMPS == "V"), STDLAB = STDLAB)
Run the code above in your browser using DataLab