将R ggplot中密度图中的y轴标准化为按组的比例

Question

我的问题与

非常相似

Normalizing y-axis in histograms in R ggplot to proportion by group

除了，我需要密度图，我希望将 y 轴作为比率，例如每 1000 名患者的 x 计数。

我有多组不同大小的数据，我希望每个比例都是相对于其组大小而不是总大小。

为了更清楚，假设我在一个数据框中有两组数据

示例数据：

dataA<-rnorm(10000,3,sd=2)
dataB<-rnorm(40000,5,sd=3)
bp_combi<-data.frame(dataset=c(rep('A',length(dataA)),rep('B',length(dataB))),
                     value=c(dataA,dataB))

我可以将分布相对于总大小绘制在一起，但不能相对于相对大小。

combi_dens = ggplot(bp_combi, 
                    aes(x=value, 
                        number_of_cases=nrow(bp_combi),
                        y=(..count..)/number_of_cases*1000, fill=dataset)) +
               geom_density(bw = 1, alpha=0.4, size = 1.5 )

是否可以根据每个组的大小来设置它？

谢谢！

Answer 1

对于那些仍然感兴趣的人。答案相当简单。首先创建一个具有相对组大小的单独列，并在 ggplot 中使用该列。

unique_episodes = bp_combi %>% group_by(dataset) %>% count(dataset)
data2 = merge(x = bp_combi, y = unique_episodes, by = "dataset", all.x = TRUE)


combi_dens = ggplot(bp_combi, 
                    aes(x=value,,
                        y=(..count..)/n*1000, fill=dataset)) +
  geom_density(bw = 1, alpha=0.4, size = 1.5 )