Forecasting, Time Series Analysis, Fourier Transform, R, Ml So Good.
%in% c("AgentState", "Callback call"))%>% filter(CallDirection=="Incoming" & DoneInIVR==0 & AgentSequence==1)%>% count()%>% group_by(RecordType) %>% imputeTS::na_kalman(.) %>% mutate(rolling_avg_30 = roll_avg_30(n)) %>% tidyr::pivot_longer(cols = c(n, rolling_avg_30)) %>% plot_time_series(newdate,