如何用reactable从指定起始列开始将多列格式化为百分比？

你可以通过提取起始列后的所有列名，批量生成格式配置，替代逐个列手动指定的方式，代码示例如下：

library(reactable)

# 构造示例数据
df <- data.frame(
  id = seq(1, 10, 1),
  sh = seq(.1, 1, .1),
  ar = seq(.1, 1, .1),
  br = seq(.1, 1, .1)
)

# 设置起始列序号（这里从第2列开始）
start_col <- 2
# 获取起始列到最后一列的所有列名
target_cols <- colnames(df)[start_col:ncol(df)]

# 批量生成百分比格式的列配置
col_config <- lapply(target_cols, function(col) {
  colDef(format = colFormat(percent = TRUE, digits = 1))
})
# 为配置列表命名，确保与列名对应
names(col_config) <- target_cols

# 生成表格
reactable(df, columns = col_config)

关键说明： #

• 调整start_col的值即可改变起始列，比如设为3就从第3列开始应用格式
• 如果需要指定列范围（比如第2到第4列），只需把target_cols改成colnames(df)[2:4]
• 批量生成的col_config列表会自动匹配对应列名，和手动逐个设置的效果完全一致

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