r - Lévy 指标实施

Question

我想（在 R 中）实现对两条曲线之间的 Lévy 距离的评估。给定两个累积分布，正式定义如下（另见Wikipedia）：

本质上是试图找到可以在两条曲线之间绘制的最大正方形。
我正在处理两个累积值，它们是具有相同域的阶跃函数，因此实现应该比一般情况更容易。
提前致谢。

有没有实现这个指标的库，或者类似的东西。如果没有，您能否建议一些从头开始的提示？