R ggplot geom_bar创建不同的输出

Question

我想为我的数据集（df）创建条形图，并且正在使用以下脚本：

p1<-ggplot(df,aes(x=variable,y=log10(value),fill=Subject))
p1+ geom_bar(stat = "identity",position = "dodge")

它创建了以下情节：

'İşçiHakları021D'的总数为56,173，'İşçiHakları111D'的总数为32,760。 那么111D如何创建比021D长的钢筋？

！ 要获得此图的数据框，请单击此处！

Answer 1

似乎ggplot并未按照您ggplot的方式进行分组-手动汇总数据可能是最简单的，这样您就可以准确知道要绘制的内容：

manual_summary <- df %>% 
  group_by(Subject, variable) %>%
  summarize(logeach = log10(sum(value)))

ggplot(manual_summary, aes(x = variable, y = logeach, fill = Subject)) +
  geom_bar(stat = "identity", position = "dodge")