如何测试数据集是否符合Zipf定律？（使用R中的图表，tikz或者甚至Python）

Question

我有一个很简单的问题，我自己无法解决：我有一个很小的计数数据集，我想把它们的分布与齐普夫定律进行比较。 我的数据是一个只有一行的简单表：

31,
29,
28,
27,
27,
27,
27,
26,
25,
24,
23,
23,
22,
22,
22,
21,
21,
20,
20,
20,
19,
19,
19,
18,
18,
18,
18,
17,
17,
17,
17,
16,
15,
15,
15,
15,
14,
14,
13,
13,
13,
13,
12,
12,
12,
12,
11,
11,
11,
10,
10,
9,
8,
8,
8,
7,
7,
7,
6,
6,
6,
6,
6,
5,
5,
5,
4,
3,
2,
2,
2,
2,
1,
1,

有人能帮我吗？ 我已经试过了