pcdf=function(x){ plot(sort(x),1:length(x)/length(x),type="S",xlab="x",ylab="prob");
qq=quantile(x,c(0.25,0.5,0.75,1));abline(v=qq);
text(qq[1],0.05,paste(expression(q[25]), "=",format(qq[1], digits =3)),adj=c(1,1));
text(qq[2], 0.05,paste(expression(q[50]), "=",format(qq[2], digits =3)),adj=c(0.5,0));
text(qq[3], 0.05,paste(expression(q[75]), "=",format(qq[3], digits =3)), adj=c(0,1));
text(qq[4], 0.05,paste("max=",format(qq[4], digits =3)), adj=c(1,0))
}
看能不能满足你的要求，分位数和最大值都在图中标出。

楼上真棒啊！

学习了

1:length(x)/length(x)    这句话是不是 有问题啊， 不行啊

错误于xy.coords(x, y, xlabel, ylabel, log) :
  'x' and 'y' lengths differ
>