限制数据帧中的小数位数 (R)

我想在导入数据框时限制小数位数。我的.txt输入的列每行有 16 位小数Value。我的数据框如下所示：

Value 

0.202021561664556
0.202021561664556
0.202021561664556
0.202021561664556
...

我的预期数据框

Value
0.20202156
0.20202156
0.20202156
0.20202156
...

不起作用的实际输入（DF）：

DF <- "NE001358.Log.R.Ratio
    -0.0970369274475688
    0.131893549586039
    0.0629266495860389
    0.299559132381831
    -0.0128804337656807
    0.0639743960526874
    0.0271669351886552
    0.322395363972391
    0.179591292893632"

DF <- read.table(text=DF, header = TRUE)

Here is.num is TRUE对于数字列和FALSE否则。然后我们申请round到数字列：

is.num <- sapply(DF, is.numeric)
DF[is.num] <- lapply(DF[is.num], round, 8)

如果您的意思不是需要更改数据框，而只是想要将数据框显示为 8 位数字，那么它只是：

print(DF, digits = 8)

在 dplyr 1.0.0 及更高版本中可以使用across within mutate像这样：

library(dplyr)
DF %>% mutate(across(where(is.numeric), ~ round(., 8)))