如何在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, ")")