if (FALSE) {
## PSD generation with minimum input arguments
aux_psdsummary(station = c("STA01", "STA02"),
period = as.POSIXct(x = c("2017-04-01",
"2017-04-03"),
tz = "UTC"),
input_dir = "~/data/seismic/sac/")
## PSD generation with some more arguments
aux_psdsummary(station = c("STA01", "STA02"),
component = "BHZ",
period = as.POSIXct(x = c("2017-04-01",
"2017-04-03"),
tz = "UTC"),
output = c("daily", "monthly"),
input_dir = "~/data/seismic/sac/",
aggregate = c(2, 10),
n_dates = 1000,
jpg_dim = c(1600, 900, 300, 50),
verbose = TRUE)
}
Run the code above in your browser using DataLab