Сложенные совокупные гистограммы / площадь участка с R - PullRequest
Новая
       34

Сложенные совокупные гистограммы / площадь участка с R

0 голосов
/ 15 мая 2018

У меня есть некоторые данные, которые выглядят как 

library(data.table)
set.seed(1)
data <- data.table( sample(1:6,1000,replace=T), rnorm(1000, mean = 5))
     V1       V2
   1:  2 5.077303
   2:  3 4.703131
   3:  4 3.816758
   4:  6 5.011293
   5:  2 5.991601
  ---            
 996:  5 5.114406
 997:  4 4.607735
 998:  2 6.652358
 999:  2 3.756302
1000:  2 4.088074

Я хочу создать график с какими-то кумулятивными гистограммами или кумулятивным графиком площади, заполненным V1 и с V2 на оси x, сложенными сверхудруг друга.Результат должен выглядеть примерно так:

http://i.imgur.com/GGywhzu.png

Это то, что я пробовал до сих пор: 

library(ggplot2)
ggplot(data, aes(group=V1, x = V2, fill=as.factor(V1))) +
    geom_histogram(aes(y=cumsum(..count..)/sum(..counts..)), bins = 50)

Однако он не правильно размещает данные на каждомДругой.Также было бы лучше с графиком площади вместо гистограммы.Вот что выдает приведенный выше код: сюжет

1 Ответ

0 голосов
/ 15 мая 2018

это то, что вы ищете? 

data$V1 <- as.factor(data$V1)
ggplot(data,aes(group=V1,fill=V1,x=V2))+
  geom_histogram()
...