设置digits=7时summarise输出与命令行计算小数位数不符的原因

这其实是显示格式的问题，不是数值本身被截断了——你计算出来的perc_survived实际值还是97.1428571...，只是tibble的默认显示规则把它简化成了97.1而已。

核心原因 #

你用dplyr::summarise()得到的结果是一个tibble（tibble是dplyr默认返回的数据框类型），而tibble的数值列显示是由pillar包控制的，和全局的getOption("digits")设置无关。

pillar默认会为数值列显示3位有效数字（可以通过getOption("pillar.sigfig")查看默认值，通常是3）。对于97.14286这样的数，3位有效数字就是97.1，所以你看到的是截断后的显示，但底层的数值是完整的。

而你在命令行直接计算68/70*100时，R控制台用的是全局digits设置（你这里是7），所以会显示完整的小数位。

验证方法 #

你可以做几个小测试来确认：

• 把结果列单独提取出来：比如假设你的summarise结果存在df_summary里，运行df_summary %>% pull(perc_survived)，这时候控制台会用全局digits显示完整的数值：97.1428571。
• 查看pillar的当前设置：运行getOption("pillar.sigfig")，会返回默认的3。

解决办法 #

根据你的需求，有几种方式处理：

1. 临时查看完整数值：用pull()提取列，或者把tibble转成普通数据框（as.data.frame(df_summary)），普通数据框会遵循全局digits设置显示。
2. 修改tibble默认显示规则：运行options(pillar.sigfig = 7)，之后所有tibble的数值列都会显示7位有效数字，和你的全局digits保持一致。
3. 在summarise里强制格式化（不推荐用于后续计算）：如果只是想输出时看到完整小数位，可以用format()函数，但会把数值转成字符类型，比如：

   summarise(
     N = n(), 
     survived = sum(Survived), 
     perc_survived = format((survived/N)*100, digits = 7)
   )
   

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