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