r - R通过替换另一列中的值来更改gt表中有效数字的数量

Question

我正在尝试创建一系列 gt 表，其中的值显示在第三个 sig 图中。因为我想显示非数字字符，所以我想显示的列是一个因素。最好的方法是什么？我以为我可以用数字列中的值替换因子列的值，但我不知道该怎么做。下面的代码是一个较大数据集的示例，我想将 Area1 中的所有类似数值的值替换为 Area2 中相应的较短值

Area1 <- as.factor(c(0,0, 0.50659782, "NS"))
Area2 <- c(NA, NA, 0.507, NA)
d <-data.frame(Area1, Area2) %>% gt() 

本质上，我希望 Area1 列看起来像

Area1
0
0
0.507
NS

Answer 1

由于您的数据具有混合类型，因此数字已经更改为字符/因子。您可以使用正则表达式方法将数据保留到小数点后 3 位。

library(gt)
Area1 <- as.factor(c(0,0, 0.50659782, "NS"))
Area2 <- c(NA, NA, 0.507, NA)
d <-data.frame(Area1, Area2) 
d$Area1 <- ifelse(is.na(d$Area2), as.character(d$Area1), d$Area2)
d <- d[-2]
gt(d)