R 用添加的符号连接列

Question

我正在尝试 select 数据框中的几列，然后将它们输出到 excel 文件。对于最后一列，我想连接几列，并在它们之间添加符号。

data %>%
  select(Place = place, Time = time, Number = paste(number_2, "(", number_1, 
                                              ",", number_3, ")")) %>%
  openxlsx::write.xlsx(file = here("data"))

我遇到错误

object not found

如果我包含数据框

data %>%
  select(Place = place, Time = time, Number = paste(data$number_2, "(", data$number_1, 
                                              ",", data$number_3, ")")) %>%
  openxlsx::write.xlsx(file = here("data"))

我收到以下错误

Can't subset to columns that don't exist

数据样本是

Place   Time    Number 2    Number 1    Number 3
R1  T1  .5  .4  .7
R2  T1  .2  .1  .3
R1  T2  .4  .3  .6
R2  T2  .3  .2  .4

感谢您的帮助！

Answer 1

您正在尝试访问名为 number_2 等的列，但这些列不存在于您发布的示例数据中。

您需要使用正确的列名称：`Number 2`。

data %>%
  select(
    Place = place,
    Time = time,
    Number = paste(`Number 2`, "(", `Number 1`, ",", `Number 3`, ")")
  ) %>%
  openxlsx::write.xlsx(file = here("data"))

注意 R 代码中的 backticks (`), which are needed around “non-syntactic” names（在你的例子中，因为你的列名包含空格，这在语法上是无效的）。

R 用添加的符号连接列

R concatenate columns with added notations

r

concatenation

paste

tidyr