如何绘制自定义分布的理论 Lorenz 和 Bonferroni 图

Question

这是 CDF，没有封闭形式的分位数函数。任何帮助将不胜感激

CDF=((alpha)**(1-exp(theta*x))-(beta)**(1-exp(theta*x)))/(alpha-beta)

我搜索了很多像“ineq”这样的包，但它们是用于内置发行版的

Answer 1

以下只是举例

CDF <- \(x, alpha, beta, theta) {
    ((alpha)**(1 - exp(theta * x)) - (beta)**(1 - exp(theta * x))) / (alpha - beta)
}

f <- \(x) CDF(x, 2, 1, 1)
curve(f, from = 0, to = 4)