我应该使用什么函数将数据框的列四舍五入为数字？

# 创建一个示例数据框
df <- data.frame(A = c(1.234, 2.567, 3.891),
                 B = c(4.523, 5.876, 6.234))

# 将数据框的列四舍五入为两位小数
df$A <- round(df$A, digits = 2)
df$B <- round(df$B, digits = 2)

# 输出结果
print(df)

      A    B
1  1.23 4.52
2  2.57 5.88
3  3.89 6.23

# 将数据框的所有列四舍五入为两位小数
df <- apply(df, 2, function(x) round(x, digits = 2))

# 输出结果
print(df)

      A    B
1  1.23 4.52
2  2.57 5.88
3  3.89 6.23