# NOT RUN {
pt <- pt.sample()
pt2 <- pt.Hz2ST(pt, ref = 200)
# }
# NOT RUN {
pt.plot(pt) %>% dygraphs::dyAxis("y", label = "Frequency (Hz)")
pt.plot(pt2) %>% dygraphs::dyAxis("y", label = "Frequency (ST re 200 Hz)")
# }
Run the code above in your browser using DataLab