Forecasting, Time Series Analysis, Fourier Transform, R, Ml So Good.
AgentSequence==1)%>% count()%>% tidyr::drop_na()%>% ggplot(., aes(x=QuarterHour, fill=n, y=factor(Month)))+ geom_tile()+ scale_fill_viridis_c(option="turbo")+ facet_wrap(~Day, scales="free_x")+ theme_bw() df%>% group_by(RecordType, Month, Day, QuarterHour)%>% filter(!RecordType %in% c("AgentState",