if (FALSE) {
## the example will convert the E, N and Z components of station RUEG1
## to the station IDs RUEGA, RUEGB, RUEGC, all with BHZ as component
aux_splitcubechannels(input = paste0(system.file("extdata",
package="eseis"), "/"),
output = tempdir(),
ID_in = c("RUEG1", "RUEG1", "RUEG1"),
component_in = c("BHE", "BHN", "BHZ"),
ID_out = c("RUEGA", "RUEGB", "RUEGC"),
component_out = c("BHZ", "BHZ", "BHZ"))
}
Run the code above in your browser using DataLab