R中多个类别之间的密度图

我有一个数据集的文本文件。它列出了两个变量：它来自的个体和与该个体相关的特定值。为了方便起见，我们可以说这是一个人一生中任意测量体重的行为

文件设置如下（带标题）：

等等。我试图用R来创建每个个体权重的密度图。所有重量的总密度图如下所示：

d <- density(my_data$weight)
plot(d)

---

d此数据帧与您拥有的实际数据相似吗

df <- data.frame(id = rep(LETTERS[1:8], 10), weight = as.integer(rnorm(80, 80, 10)))

> head(df)
  id weight
1  A     78
2  B     72
3  C     76
4  D     58
5  E     84
6  F     78

library(ggplot2)
ggplot(df, aes(x=weight)) + 
  geom_density(alpha=.2, fill="#FF6666") +
  facet_wrap( ~ id, nrow=2)

df头（df）
id重量
1A 78
2 B 72
3 C 76
4 D 58
5 E 84
6 F 78
图书馆（GG2）
ggplot（df，aes（x=重量））+
几何密度（alpha=.2，fill=“#FF6666”）+
面_包裹（~id，nrow=2）

你有机会尝试我的答案吗？
df <- data.frame(id = rep(LETTERS[1:8], 10), weight = as.integer(rnorm(80, 80, 10)))

> head(df)
  id weight
1  A     78
2  B     72
3  C     76
4  D     58
5  E     84
6  F     78

library(ggplot2)
ggplot(df, aes(x=weight)) + 
  geom_density(alpha=.2, fill="#FF6666") +
  facet_wrap( ~ id, nrow=2)