"tidy"(x, ...)
spc <- spectrum(lh) tidy(spc) library(ggplot2) ggplot(tidy(spc), aes(freq, spec)) + geom_line()
Run the code above in your browser using DataLab