# NOT RUN {
# Sum over sensors ----
pedestrian %>%
summarise(Total = sum(Count))
# Sum over sensors by days ----
pedestrian %>%
index_by(Date) %>%
summarise(Total = sum(Count))
## .drop = TRUE ----
pedestrian %>%
summarise(Total = sum(Count), .drop = TRUE)
# }
Run the code above in your browser using DataLab