假设您将5亿的收入随机分配给10,000人。只有一种方法可以让每个人平均获得50,000个份额。因此,如果您随机分配收入,则极不可能实现平等。但是,有无数种方式可以给少数人很多现金,而给许多人一点钱甚至没有钱。实际上,考虑到所有可以分配收入的方式,大多数方法都会产生指数分布的收入。
我已经使用以下R代码(似乎可以肯定结果)完成了此操作:
library(MASS)
w <- 500000000 #wealth
p <- 10000 #people
d <- diff(c(0,sort(runif(p-1,max=w)),w)) #wealth-distribution
h <- hist(d, col="red", main="Exponential decline", freq = FALSE, breaks = 45, xlim = c(0, quantile(d, 0.99)))
fit <- fitdistr(d,"exponential")
curve(dexp(x, rate = fit$estimate), col = "black", type="p", pch=16, add = TRUE)
我的问题
我该如何分析证明结果分布确实是指数的?
附录
感谢您的回答和评论。我考虑了这个问题,并提出了以下直观的推理方法。基本上会发生以下情况(请注意:过分简化):您需要沿着数量去扔(偏)硬币。每次得到例如正面的时候,就除以额。您分发结果分区。在离散情况下,抛硬币遵循二项式分布,分隔物是几何分布的。连续类似物分别是泊松分布和指数分布!(通过相同的推理,从直觉上也很清楚为什么几何分布和指数分布具有无记忆特性-因为硬币也没有记忆)。