Summarize total chargers and total charger types based on city.
This commit is contained in:
parent
5521dc04d0
commit
f4f9329e70
@ -127,11 +127,13 @@ charger_by_city_summary <- dataset %>%
|
|||||||
group_by(City) %>%
|
group_by(City) %>%
|
||||||
summarise(
|
summarise(
|
||||||
`Total Stations` = n(),
|
`Total Stations` = n(),
|
||||||
|
`Total Level 2 Chargers` = sum(`EV Level2 EVSE Num`, na.rm = TRUE),
|
||||||
|
`Total DC Fast Chargers` = sum(`EV DC Fast Count`, na.rm = TRUE),
|
||||||
`Total Chargers` = sum(`Total Chargers`)) %>%
|
`Total Chargers` = sum(`Total Chargers`)) %>%
|
||||||
arrange(desc(`Total Chargers`))
|
arrange(desc(`Total Chargers`))
|
||||||
```
|
```
|
||||||
|
|
||||||
A new data frame is created to summarize the Total Chargers based on City in descending order of total chargers.
|
A new data frame is created to summarize the total chargers and total charger types based on City in descending order of total chargers.
|
||||||
|
|
||||||
```{r, message=FALSE}
|
```{r, message=FALSE}
|
||||||
charger_by_city_summary %>%
|
charger_by_city_summary %>%
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user