使用 Microsoft Excel 绘制 CDF 图

Question

我不太确定我是否可以在这里或SuperUser 上问这个问题，

我想知道如何从我的 excel 数据中绘制CDF 图表。 我的数据是这样的（我的真实数据有22424条记录）：

1   2.39E-05
1   2.39E-05
1   2.39E-05
2   4.77E-05
2   4.77E-05
2   4.77E-05
4   9.55E-05
4   9.55E-05
4   9.55E-05
4   9.55E-05
4   9.55E-05
4   9.55E-05
8   0.000190931
8   0.000190931

Answer 1

您可以使用NORMDIST函数并将最终参数设置为true：

例如，假设我有 20 个数据点，从 0.1 到 2.0，增量为 0.1，即 0.1、0.2、0.3...2.0。

现在假设该数据集的平均值为 1.0，标准差为 0.2。

要获得 CDF 图，我可以对每个值使用以下公式：

=NORMDIST(x, 1.0, 0.2, TRUE) -- where x is 0.1, 0.2, 0.3...2.0

---

要从您的数据中删除重复的条目并汇总相同的值，您可以使用以下代码。

1. 在 Excel 中，将数据放在 sheet1 中，从单元格 A1 开始
2. 按ALT + F11打开VBE
3. 现在Insert > Module 在编辑器中放置一个模块
4. 将下面的代码剪切并粘贴到模块中
5. 将光标放在RemoveDuplicates 中的任意位置，然后按F5 运行代码

因此，您独特的汇总结果将显示在工作簿的 Sheet2 中。

Sub RemoveDuplicates()
    Dim rng As Range
    Set rng = Range("A1:B" & GetLastRow(Range("A1")))

    rng.AdvancedFilter Action:=xlFilterCopy, CopyToRange:=Worksheets("Sheet2").Range("A1"), Unique:=True

    Dim filteredRng As Range
    Dim cl As Range

    Set filteredRng = Worksheets("Sheet2").Range("A1:A" & GetLastRow(Worksheets("Sheet2").Range("A1")))

    For Each cl In filteredRng
        cl.Offset(0, 1) = Application.WorksheetFunction.SumIf(rng.Columns(1), cl.Value, rng.Columns(2))
    Next cl
End Sub

Function GetLastRow(rng As Range) As Long
    GetLastRow = rng.End(xlDown).Row
End Function

Answer 2

这个答案是如何创建“经验分布函数”，这是很多人在说 CDF 时真正想到的（包括我自己）...https://en.wikipedia.org/wiki/Empirical_distribution_function

假设样本数据的第二列从单元格 B1 开始，在单元格 C1 中，键入：

=SUM(IF($B$1:$B$14<=B1,1,0))/COUNT($B$1:$B$14)

然后按 Shift+Enter，将其作为数组公式输入。它现在在公式栏中将如下所示：

{=SUM(IF($B$1:$B$14<=B1,1,0))/COUNT($B$1:$B$14)}

向下复制单元格以覆盖 C1:C14。然后以 B1:B14 为 X，C1:C14 为 Y 绘制散点图。它将显示四个点。

• 不需要排序或删除重复项
• 使用范围名称或利用 Excel 表格功能更自动地管理输入范围
• 这是一个单单元格数组公式，因此根据您复制和粘贴的方式，您将收到一条消息“无法更改数组的一部分”。如果您使用复制粘贴，请复制单元格 C1，然后选择单元格 C2:c14 并粘贴。
• 理想情况下，该图应显示为阶跃函数，但我没有时间想出任何方法（好或坏）来做到这一点。

Answer 3

让我们看看我是否理解您的问题。假设 Excel 2007 及更高版本。假设您的数据在 A 列和 B 列中。

第一步

在单元格 C1 中使用此公式：

=B1*COUNTIF(A:A,A1) 

单元格 D1 中的这个公式：

=SUM($C$1:C1)  

并将两个公式复制到数据的末尾。

第二步

选择四列。
在功能区数据中选择->删除重复项
取消选中 B、C 和 D 列

第三步

选择 A 列和 D 列。 在 Ribbon Insert->Scatter->Line 中选择

这是您想要实现的目标吗？

HTH！