R ggplot geom_bar创建不同的输出

Question

我想为我的数据集（df）创建一个条形图，我正在使用这个脚本：

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

它创造了这个阴谋：

'İşçiHahları021D'的总数为56,173，总数为  'İşçiHahları111D'是32,760。那么111D如何创建比021D更长的条形图？

!! To get data frame for this plot please click here !!

Answer 1

看起来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")