r - 正态概率图上的累积频率

Question

如何获得绘制在正态概率（非线性）y 轴上的每个唯一 X 值的累积频率。使用过 probplot(x) 但它没有累积相同的值。我的数据是一个带有血液结果的数据框。probplot 绘制每个单独的血液结果，而不是每个独特结果的累积频率。

小数据示例：

V1
7.1
7.2
7.2
7.6
6.8
6.9
6.8
7.4 
7.0

我可以计算累积频率，但不能用正确的正态概率轴绘制它：

tabvals <- table(data$V1)

tabvals <- cbind.data.frame(tabvals)

tabvals$frequency <- tabvals$Freq/sum(tabvals$Freq)

tabvals$kummulated <- NA

for (i in 1:nrow(tabvals)){
if (i == 1) {
     tabvals$kummulated[i] <- tabvals$frequency[i]
   } else {
       tabvals$kummulated[i] <- tabvals$kummulated[i-1] + tabvals$frequency[i]
     }}

plot(tabvals$Var1, tabvals$kummulated , type="l")

获得正确 Y 轴的唯一方法是：

library(e1071)

probplot(data$V1)

但这将 7.2 和 7.2 绘制为两个不同的点，而不是累积它们。