使用 stringr 和管道而不是 gsub 简化列编辑

Question

我正在尝试从列中删除 $ 符号和 , ，到目前为止一直通过使用 gsub 来做到这一点，但我想知道是否有一种方法可以在管道内使用 stringr 来做到这一点。

示例代码：

DataFrame <- structure(list(Date = structure(c(18485, 18459, 18471, 18459, 
18459, 18459, 18499, 18513, 18513, 18513), class = "Date"), Payment = c("$10,000.00", 
"$2,000.00", "$500.00", "$500.00", "$5,000.00", "$4,000.00", 
"$5,000.00", "$500.00", "$20,000.00", "$3,290.00")), row.names = c(NA, 
-10L), class = c("tbl_df", "tbl", "data.frame"))

当前使用 gsub 的方法：

DataFrame$Payment <-gsub("\\$","",DataFrame$Payment)
DataFrame$Payment <-gsub("\\,","",DataFrame$Payment)
DataFrame$Payment <- as.numeric(DataFrame$Payment)

感谢您的指点！

Answer 1

实际上，gsub角色类已经非常简洁了：

DataFrame$Payment <- as.numeric(gsub("[$,]", "", DataFrame$Payment))