powered by
X2SAC(nh, g)
## Not run: # ### get data: # GH <- Mine.seis(at1, at2, DB, NULL , NULL, # kind = 1, Iendian=1) # w <- swig(GH, PADDLAB=c("X2SAC","X2RSEIS","YPIX" ) ) # # ## End(Not run)
Run the code above in your browser using DataLab