从 colnames 中删除引号?

remove quotes from colnames?

我有以下形式的数据框

"column1" "column2"
1 5
2 6
3 7

如何删除列名中的引号?我试过使用 gsub 但我不能引用引号哈哈。还需要一种方法来做到这一点,而不仅仅是 names(data) <- c("column1", "column2")。谢谢大家!

您可以将 gsub 与单引号一起使用,以便引用双引号字符进行替换:

names(df) = gsub('"', "", names(df))

测试:

# Set up data
d = mtcars[1:3, 1:4]
names(d)[1:2] = c('"column1"', '"column2"')

names(d)
#> [1] "\"column1\"" "\"column2\"" "disp"        "hp"

d
#>               "column1" "column2" disp  hp
#> Mazda RX4          21.0         6  160 110
#> Mazda RX4 Wag      21.0         6  160 110
#> Datsun 710         22.8         4  108  93

# Remove quotation marks from column names
names(d) = gsub('"', "", names(d))
names(d)
#> [1] "column1" "column2" "disp"    "hp"

d
#>               column1 column2 disp  hp
#> Mazda RX4        21.0       6  160 110
#> Mazda RX4 Wag    21.0       6  160 110
#> Datsun 710       22.8       4  108  93

reprex package (v0.3.0)

于 2021 年 1 月 19 日创建