r - 在 Reactable 表中使用子集数据

Question

在 reactable 中，您可以对命名列进行如下编辑：

    columns = list(
        Species = colDef(minWidth = 140),
        AnotherNamedColumn = colDef(align = "center")
)

我使用的数据每周都会更改，因此我不能使用命名列。我需要从 df 子集这个：

    columns = list(
        df[1,2] = colDef(minWidth = 140),
        df[1,3] = colDef(align = "center")
)

但可反应不喜欢这样。有谁知道我怎样才能让它工作并真正对评估子集代码做出反应，这样我就可以“指向”正确的列而不命名它？

Answer 1

如果我说对了，那么实现所需结果的一种选择如下所示：

1. 将您colDef的 s 放入列表中
2. 根据 df 中的列位置设置列表的名称
3. 将命名列表传递给列参数

library(reactable)

df <- iris
columns <- list(colDef(minWidth = 140), colDef(align = "center"))
columns <- setNames(columns, names(df)[2:3])
reactable(df, columns = columns)