Создайте график плотности с помощью ggplot2 из фрейма данных, содержащего количество переменных - PullRequest
0 голосов
/ 05 декабря 2018

У меня есть 3 кадра данных, показывающих размеры генетических последовательностей из 3 образцов.Вместо того, чтобы перечислять размер каждой последовательности, мои данные суммируются как число каждого размера.Фреймы данных выглядят так:

> head(df1)
  Size Count
1   56     1
2   58     1
3   59     2
4   60     2
5   61     3
6   62     1

> head(df2)
  Size Count
1   53     1
2   55     1
3   57     2 
4   58     2
5   59     3
6   60     3

> head(df3)
  Size Count
1   53     1
2   56     1
3   57     3 
4   58     2
5   59     5
6   60    10

Я хотел бы нарисовать график плотности наложения этих трех образцов, например, такой:

Example

Какя могу это сделать?Я понял, как создать новые фреймы данных с повторяющимся номером каждого размера, объединить эти 3 новых фрейма данных и затем использовать ggplot () + geom_density ().

new_df1 <- data.frame(size=rep(df1$Size, df1$Count), sample="No_1")
new_df2 <- data.frame(size=rep(df2$Size, df2$Count), sample="No_2")
new_df3 <- data.frame(size=rep(df3$Size, df3$Count), sample="No_3")
all_sample <- rbind(new_df1, new_df2, new_df3)

ggplot(data=all_sample, aes(x=size)) + geom_density(aes(colour=sample))

Был ли это правильный путьделать то, что я хотел бы сделать?Есть ли более аккуратный способ сделать это?

Любые мысли приветствуются!Спасибо.

...