write1segy {RSEIS} | R Documentation |
Write One segy/sac file
Description
Write out one segy binary format file.
Usage
write1segy(alist, fn = NULL, BIGLONG = FALSE)
write1sac(alist, fn = NULL, BIGLONG = FALSE)
Arguments
alist |
list of traces with segy/sac header and an integer/real format time series |
fn |
Output file name |
BIGLONG |
logical, indicating whether long is 8 or 4 bytes. |
Details
Segy format files are in integer format. The time series ususally represents counts recorded in a data acquisition system. The header includes meta-data and other identifying information.
Value
Side effects in the file system.
Note
The Endian-ness of the output file will be the native endian-ness of the system.
Author(s)
Jonathan M. Lees<jonathan.lees@unc.edu>
See Also
rseis2segy, read1sac, read1segy
Examples
## Not run:
theENDIAN = .Platform$endian
BIGLONG = FALSE
### write1segy is in rseis2segy
data(KH)
apath = tempdir()
J = rseis2segy(KH, sel=1, path=apath, BIGLONG=BIGLONG )
L = list.files(path=J, full.names=TRUE)
Z = read1segy(L[1], Iendian = theENDIAN, HEADONLY = FALSE, BIGLONG = BIGLONG)
plot(Z$amp, type='l')
########## same with SAC files:
J = rseis2sac(KH, sel = 1, win = c(0, 1), path = apath, BIGLONG = BIGLONG)
L = list.files(path=J, pattern='.SAC', full.names=TRUE)
Z = read1sac(L[1], Iendian = theENDIAN, HEADONLY = FALSE, BIGLONG = BIGLONG)
plot(Z$amp, type='l')
## End(Not run)
[Package RSEIS version 4.2-4 Index]