r - 合并两列中的字符值并用括号括起来

Question

我有一个这样的数据集:

code <- "A.123"
name <- "John"
df <- data.frame(code,name)

   code name
1 A.123 John

我正在尝试合并这两列，因此新列如下所示:

code <- "A.123"
name <- "John"
new_column <- "John (A.123)"
df <- data.frame(code,name,new_column)

   code name   new_column
1 A.123 John John (A.123)

我尝试了这段代码，但我不确定如何在此代码中合并括号:

df <- df%>%
  mutate(new_column = paste(name,code))

我将不胜感激所有的帮助!谢谢!!!

Answer 1

在base R中使用sprintf

 with(df, sprintf("%s (%s)", name, code))
[1] "John (A.123)"

---

或者使用胶水

library(dplyr)
library(glue)
df %>%
   mutate(new_column = glue("{name} ({code})"))
   code name   new_column
1 A.123 John John (A.123)