Метинкс, вам нужен график эмпирической кумулятивной функции распределения.
Взгляните на документацию по ecdf()
, а также по более интересным Ecdf()
в пакете CRAN Hmisc .
Hmisc Ecdf пример: ExecTm
массив времени выполнения, HttpProvCall
массив времени, необходимого для вызова нисходящей системы, и мы сравниваем время, которое мы проводим с нисходящей системой, с процентилями
> library(Hmisc)
> x <- c(ExecTm,ExecTm-HttpProvCall)
> g <- c(rep('ExecTm',length(ExecTm)),rep('ExecTm-HttpProvCall',length(ExecTm)))
> Ecdf(x, group=g, xlab='Test Results',
+ label.curves=list(keys=1:2),q=c(.90,.95,.98))