时间预测模型

时间:2015-05-24 14:21:19

标签: r ggplot2

尝试制作一个模型,预测项目需要多长时间。当前模型显示 可能 需要多长时间。但我想制作一个模型,它将采用 long 。这可以通过添加所有先前的数字直到达到100%百分比来实现。结果应该像S曲线。也就是说,我希望它增加直到达到100%,而不是中途减少。

library(ggplot2)
library(mc2d)
library(scales)
n=1000

planing=rpert(n, min=30, mode=40, max=70, shape=0)
marketing=rpert(n, min=40, mode=60, max=120, shape=30)
hirepeople=rpert(n, min=25, mode=40, max=70, shape=30)

totallength=planing + marketing + hirepeople

p <- ggplot(data.frame(totallength), aes(x = totallength))  
p <- p + geom_histogram(aes(y = (..count..)/sum(..count..)), color = "black", fill = "steelblue", 
                        binwidth = 5)
p <- p + scale_y_continuous(labels = percent)
p <- p + xlab("Days") + ylab("Percentage")
p <- p + theme_bw() 
print(p)

2 个答案:

答案 0 :(得分:0)

您应该使用geom_histogramecdf统计信息。这将总结所有百分比,并将产生您正在寻找的东西。

qplot(totallength, stat = "ecdf", geom = "step")

enter image description here

答案 1 :(得分:0)

添加像scale_y_continuous(breaks = seq(0,1,by = 0.1),labels = percent_format())这样的东西应该添加百分比。