ggplot2 совокупный процентный граф

Question

Я пытаюсь создать кумулятивный граф%, так что все значения = 100% по оси y.

Вот код:

dmScat <- data.frame(c(0,1,2,3,4,5,6)) 

colnames(dmScat) <- c("c") 

ggplot(dmScat, 
     aes(x=sort(c), 
      y=1:length(c)),)+ 
    geom_point(shape=1, colour = "Orange")+ 
    labs(x="DM %",y="Cumulative %")+ 
    scale_y_continuous(labels = percent) 

Я просто хочу, чтобы это было 0% до 100% для всех данных.

Приветствия,

Answer 1

Если я правильно понял вопрос (хотя пример ожидаемого результата будет полезно), следующее может помочь:

library(dplyr) 
library(ggplot2) 

d <- data.frame(x = 0:6) 

d <- d %>% mutate(percent = 100/n() * 1:n()) 

ggplot(d, aes(x = x, y = percent)) + 
    geom_area() + 
    geom_point(color = "lightblue", size = 5) + 
    labs(x = "X variable", y = "Cumulative %") + 
    theme_bw()