Stacked bar plots in ggplot

Question

I have the follwing data frame

    State Total_EV_1 Total_EV_2 Total_EV_3 total
    <fctr>      <int>      <int>      <int> <dbl>
1     CA        982      13166       1670 15818
2     TX        199       2169        267  2635
3     FL        329       1721        233  2283
4     WA        239       1647        161  2047
5     GA        199       1462        246  1907
6     NY         87       1475        178  1740

I would like to plot bars for each state (on x axis) and Total on Y axis and then color each of the bars according to number of total_EV1, total_EV2, Total_EV3. total = Total_EV1 + Total_EV2+Total_EV3

How do I go about doing that. What I can plot right now is a bar plot of state vs total.

image attached in the link below

State vs total charger points

score 0 · Answer 1 · answered Aug 02 '17 at 02:59

See if this works for you:

df <- data.frame(
                 State      = c("CA", "TX", "FL", "WA", "GA", "NY"),
                 Total_EV_1 = c(982, 199, 329, 239, 199, 87),
                 Total_EV_2 = c(13166, 2169, 1721, 1647, 1462, 1475),
                 Total_EV_3 = c(1670, 267, 233, 161, 246, 178),
                 total      = c(15818, 2635, 2283, 2047, 1907, 1740)
                 )
      
library(tidyverse)      

df1 <- df %>% select(-total) %>%
      gather(Type, Value, -State) %>%
      mutate(State = factor(State, 
                     levels = c("CA", "TX", "FL", "WA", "GA", "NY")))
                     
ggplot(data = df1, aes(x = State, y = Value))+ 
      geom_bar(aes(fill = Type), stat = "identity")

Stacked bar plots in ggplot

1 Answers1