Mobile Network Data Visualisations

Time Series plot showing Average number of users on each cell across the dataset

df.TAS_pmData_Day <- 
  df.TAS_pmCellData %>% 
  select(time, freqBand, Avg_RRC_ConnUser) %>% 
  group_by(time, freqBand) %>%
  summarize(sum_users=sum(Avg_RRC_ConnUser)) %>%
  as.data.frame()
p <- ggplot(data = df.TAS_pmData_Day, aes(x=time, y=sum_users)) + geom_line(aes(colour=freqBand)) 
p + ggtitle("Hobart Total Average Users per Day") + ylab("Total Users")