/hht_spectrogram.R
Created Sep 1, 2018
| library(hht) | |
| data(PortFosterEvent) | |
| dt <- mean(diff(tt)) | |
| ft <- list() | |
| ft$nfft <- 4096 | |
| ft$ns <- 30 | |
| ft$nov <- 29 | |
| time.span <- c(5, 10) | |
| freq.span <- c(0, 25) | |
| amp.span <- c(1e-5, 0.0003) | |
| FTGramImage(sig, dt, ft, time.span = time.span, freq.span = freq.span, | |
| amp.span = amp.span, pretty = TRUE, img.x.format = "%.1f", | |
| img.y.format = "%.0f", | |
| main = "Port Foster Event - Fourier Spectrogram") |
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment