R语言stem函数处理大计数数据的茎叶图输出是否准确？

结论 #

你对输出的解读有误，R的stem函数本身计算没有问题。

原因解释 #

• stem函数的width参数定义了茎叶图中叶区域的最大可显示字符数，你设置了width=20，因此茎为1的行最多打印20个叶字符。
• 你的数据中1的总个数是1000，打印20个0之后剩余的未展示数量为1000-20=980，和输出里标注的+980完全匹配。
• 你数出只有8个0，是因为你的运行环境（R控制台、终端）的默认行宽不足，导致连续的0序列被自动折行，你漏算了折到下一行的0，才会得到8+980=988的错误计算结果。

验证方法 #

你可以把width参数调小到10再运行代码：

X <- c(rep(1,1000),2:15)
stem(X,width = 10)

此时输出第一行会变成1 | 0000000000+990，10个打印的0加990个未打印的，总和正好是1000，非常容易核对。

内容的提问来源于stack exchange，提问作者safelyanonymous