用于创建多个条形图的数据争论

Question

所以，我有这个tibble，我试图从中制作一个多条形图，显示支持（支持）或反对（反对）这些候选人中的每一个花费了多少

但是，我完全不知道如何着手去做，我想我想重新排列这个 tibble 以便更容易地创建图表。任何指针都会非常有帮助。

A tibble: 5 x 5
  type                   clinton      sanders     omalley fa_camp
  <chr>                  <dbl>         <dbl>         <dbl> <chr>   
1 24A                 51937848        859337             0 against 
2 24C                 15106530           900             0 for     
3 24E                 29651626       5307952        374821 for     
4 24F                  5096083        304153             0 for     
5 24N                    10139             0             0 against

我希望最终能得到这样的结果：

不同颜色的条形图为 for/against，y 轴为花费的金额。

Answer 1

在绘图之前，将放入长格式。

library(tidyverse)
library(scales)

df %>%
  pivot_longer(cols = -c(type, fa_camp), names_to = "candidate", values_to = "amount_spent") %>%
  ggplot(aes(x = candidate, y = amount_spent, group = fa_camp, fill = fa_camp)) +
    geom_bar(stat = "identity", position = "dodge") +
    scale_y_continuous(labels = dollar)

情节

用于创建多个条形图的数据争论

Data wrangling for creating multiple bar graph

r

ggplot2

data-wrangling