Forecasting, Time Series Analysis, Fourier Transform, R, Ml So Good.
date(newdate))%>% select(newdate, value)%>% ungroup() fitted <- rHarmonics::harmonics_fun(user_vals = TC_df_wave2$value, user_dates = TC_df_wave2$newdate, harmonic_deg = 365) combined_df <- cbind(TC_df_wave2, fitted) names(combined_df) <- c("dates", "calls", "fitted") ggplot2::ggplot() +