Forecasting, Time Series Analysis, Fourier Transform, R, Ml So Good.
subset(spec.df)) + geom_path(aes(x = freq, y = spec,color = kernel)) + scale_x_continuous("Period (hours)", breaks = hours.freqs, labels = hours.labels) + scale_y_log10()+ theme_bw() plot2 <- ggplot(data = subset(spec.df)) + geom_path(aes(x = freq, y = spec,color = kernel)) + scale_x_log10("Period