r中每个类别的条形图平均值

这里是R新手，但找不到这个简单问题的答案。我这里有一些数据：

我想画出民主党人、共和党人和独立人士的平均信任水平，如下所示：

。。。使用ggplot

我尝试了以下代码（Q4=政党归属栏）

---

假设_1这可能有效，但在缺乏可复制数据的情况下无法测试：

library(tidyverse)
#Code
data.df %>%
  group_by(Q4) %>%
  summarise(avgTRUST=mean(avgTRUST,na.rm = T)) %>%
  ggplot(aes(x = Q4, y = avgTRUST))+
  geom_col(stat = 'identity', fill = "blue") +
  ggtitle("Trust in Government Institutions (by Political Party)") +
  theme_minimal() +
  theme(axis.title.x=element_blank()) +
  labs(y = "Trust Levels")

好极了非常感谢。还增加了管道。@glizzard太棒了，很乐意帮忙！
library(tidyverse)
#Code
data.df %>%
  group_by(Q4) %>%
  summarise(avgTRUST=mean(avgTRUST,na.rm = T)) %>%
  ggplot(aes(x = Q4, y = avgTRUST))+
  geom_col(stat = 'identity', fill = "blue") +
  ggtitle("Trust in Government Institutions (by Political Party)") +
  theme_minimal() +
  theme(axis.title.x=element_blank()) +
  labs(y = "Trust Levels")