r - 如何用ggplot2中一列的总和做直方图？

Question

我有要绘制为直方图的数据。这是我的数据

convergence,rules,fact,time
1,domain,1802,8629
1,domain,1802,8913
1,rdfs,595,249
1,domain,1,9259
1,videcom,1,9071
2,domain,314151,9413
2,rdfs,8,253
....

我想要的是为每个 convergence 值绘制每个 rules 的 time 总和

这是我目前所做的

图书馆(ggplot2)

w <- read.csv(file="s2.csv", head=TRUE, sep=",")

p <- ggplot(data=w, aes(group=convergence, x=factor(rules))) + geom_bar(aes(colour="red")) + + geom_text(aes(y=time + 1000, colour="red", label=time)) + facet_grid( convergence ~ . )

ggsave(file="s2.1m.png", width=15)

但结果并没有像我想要的那样对每个 rules 的 times 求和。

简单的说

我想要每个 rules 值的直方图，表示其对应的 time 值的总和

我在这里错过了什么？

Answer 1

您需要使用权重 美学。这会根据 bin 的值对每个 bin 的计数进行加权。

ggplot(w, aes(x=rules, weights=time)) + 
  geom_bar() + facet_grid(convergence ~ .) +
  geom_text(stat="bin", aes(label=..count..), color="red", vjust=-0.1) 

为了使文本正常工作，我们需要使用 stat="bin"，这与 geom_bar() 隐式执行的操作相同。然后我们可以使用特殊值 ..count.. 引用数据框中的列 ggplot 在计算统计数据后内部生成。