大概这个问题更多的是关于表的表示，而不是关于舍入值的存储，这些通常是独立的概念。如果要控制输出表中值的格式（即其中kable/kableExtra、gt、formattable、…或者可能只是tibble输出），它的格式，而不是（只是）四舍五入你可能会感兴趣。
下面是一个格式化的tibble列的示例;还要注意最后一个表达式，它显示了数据的存储方式（1，1.2501而不是1.0，1.3），这意味着如果您在计算中确实需要舍入值，您仍然应该舍入：

library(dplyr, warn.conflicts = FALSE)

df <- tibble(n = c(1, 1.2, 1.2501, 1234), 
             l = LETTERS[1:4])

# tibble::num -- format a numeric vector
df_rounded <- mutate(df, across(where(is.numeric), \(x) tibble::num(x, digits = 1)))

# how it prints:
df_rounded      
#> # A tibble: 4 × 2
#>           n l    
#>   <num:.1!> <chr>
#> 1       1.0 A    
#> 2       1.2 B    
#> 3       1.3 C    
#> 4    1234.0 D

# how formatted numeric column is represented:
dput(df_rounded$n)
#> structure(c(1, 1.2, 1.2501, 1234), pillar = structure(list(sigfig = NULL, 
#>     digits = 1, label = NULL, scale = NULL, notation = NULL, 
#>     fixed_exponent = NULL, extra_sigfig = NULL), class = c("pillar_num_attr", 
#> "pillar_vctr_attr", "tibble_vec_attr")), class = c("pillar_num", 
#> "pillar_vctr", "vctrs_vctr", "double"))

创建于2023-09-24使用reprex v2.0.2