regex - R:删除 '$' 符号

Question

我从网络服务器下载了一些数据，包括为人类格式化的价格，包括 $ 和千位分隔符。

> head(m)
[1] $129,900 $139,900 $254,000 $260,000 $290,000 $295,000

我能够摆脱逗号，使用

m <- sub(',','',m)

但

m <- sub('$','',m)

不会删除美元符号。如果我尝试 mn <- as.numeric(m)或 as.integer 我收到一条错误消息:

Warning message: NAs introduced by coercion

结果是:

> head(m)
[1] NA NA NA NA NA NA

如何删除 $ 符号？谢谢

Answer 1

 dat <- gsub('[$]','',dat)
 dat <- as.numeric(gsub(',','',dat))
 > dat
 [1] 129900 139900 254000 260000 290000 295000

一步

 gsub('[$]([0-9]+)[,]([0-9]+)','\\1\\2',dat)
[1] "129900" "139900" "254000" "260000" "290000" "295000"