使用来自向量的列名称创建空 tibble/数据框

我想创建一个空数据框，其中列名称来自字符向量。

例如，如果这是我的向量：

 vec <- letters[1:3]

我想创建一个空数据框，如下所示：

 df <- tibble('a' = character(), 'b' = character(), 'c' = character())

但是，我想迭代向量中的项目来填充数据框名称，而不必手动指定每个项目。事实上，我的向量有 40 多个名称。

我已经尝试了以下方法，但它们不起作用：

 df <- tibble(vec[1:3])
 df <- tibble(vec)
 df <- tibble(for (i in 1:3){
   vec[i]
 })

对此的任何帮助将不胜感激！

您可以创建一个命名向量，vec，其中第一个参数设置所需的列类型。这rep("", 3)行说我想要三个字符列。那么第二个参数是列名称的向量。

Use dplyr::bind_rows将其转换为一行的 tibble。然后[0, ]选择零行，将其留空。

通过这种方法，您可以轻松控制每列的​​数据类型。

library(dplyr)

vec <- setNames(rep("", 3), letters[1:3])
bind_rows(vec)[0, ]

# A tibble: 0 x 3
# ... with 3 variables: a <chr>, b <chr>, c <chr>

您还可以使用as_tibble如果你转置指定的向量。我想我用bind_rows因为我通常有dplyr已加载但未加载tibble.

library(tibble)

vec <- setNames(rep("", 3), letters[1:3])
as_tibble(t(vec))[0, ]

# A tibble: 0 x 3
# ... with 3 variables: a <chr>, b <chr>, c <chr>

如果您知道所有列都是单一类型（例如字符），您可以执行类似的操作。

vec <- letters[1:3]
df <- bind_rows(setNames(rep("", length(vec)), vec))[0, ]