如何在R中的数据框中为列值添加括号？

Question

我正在处理敏感数据，因此我创建了一个可以作为示例的虚假数据框。 这就是我们正在处理的。

n    percent
4     36%
5     51%
6     61%
7     71%
8     84%
9     96%
10    100%

很简单。 我想更改百分比列，以便值周围有括号。 所以基本上，我希望数据框看起来像这样：

n  Percent
4   (36%)
5   (51%)
6   (61%)

我意识到这将使它成为一个字符串，但这对我的最终目的来说不是问题。 我编写了一个函数，该函数将列作为带括号的向量返回。

addparentheses <- function(x){paste("(", x, ")")}

addparentheses (sample_data$percent)

[1] "( 36% )" "( 51% )" "( 61% )" "( 71% )" "( 84% )" "( 96% )" "( 100% )"

我怎样才能写出这样的东西，以便它实际更改数据框，而不仅仅是返回一个向量？

任何想法和见解都非常感谢。 谢谢！！

Answer 1

library(dplyr)
x <- tibble(
  n = 4:10,
  pct = paste0(4:10, "%")
)

x <- x %>%
  mutate(pct = paste0("(", pct, ")"))

或者在基础 R

x$pct <- paste0("(", x$pct, ")")