R中的缩放/加权密度图

Question

我想生成观察到的温度的密度图,该密度图通过每个温度数据点观察到的事件数量来缩放.我的数据包含两列:温度和数量[观察结果].

现在,我有一个密度图,只根据以下内容包含温度频率:

plot(density(Temperature, na.rm=T), type="l", bty="n")

如何根据每个温度下的观测数量来调整此密度？例如,我希望能够看到温度密度图缩放,以显示在较高/较低温度下每个温度是否有更多/更少的观测值.

我想我正在寻找可以加重温度的东西？

Answer 1

我认为你可以通过传递weights参数得到你想要的东西density.这是一个使用的例子ggplot

dat <- data.frame(Temperature = sort(runif(10)), Number = 1:10)
ggplot(dat, aes(Temperature)) + geom_density(aes(weights=Number/sum(Number)))

Answer 2

并在基础上执行此操作(使用DanM的数据):

plot(density(dat$Temperature,weights=dat$Number/sum(dat$Number),na.rm=T),type='l',bty='n')