R内的gsub()函数

今天遇到了一个问题就是，如果数据里面有逗号，那么如何转换他们。就像下面的这样：

> exercise9_1$地区生产总值
 [1] 16,251.93 11,307.28 24,515.76 11,237.55 14,359.88 22,226.70 10,568.83
 [8] 12,582.00 19,195.69 49,110.27 32,318.85 15,300.65 17,560.18 11,702.82
[15] 45,361.85 26,931.03 19,632.26 19,669.56 53,210.28 11,720.87 2,522.66 
[22] 10,011.37 21,026.68 5,701.84  8,893.12  605.83    12,512.30 5,020.37 
[29] 1,670.44  2,102.21  6,610.05 
31 Levels: 1,670.44 10,011.37 10,568.83 11,237.55 11,307.28 ... 8,893.12
#哈哈哈，可以看出这个是因子，我说我怎么画不了图……

　　

16,251.93里面有个逗号，一般来说，可以用excel来转换，但是，本人有强迫症，后来在网上搜索到可以用gsub()函数来处理，

> number <- c("11,307.28")
> mode(number)
[1] "character"
> (test1 <- gsub(",","",number))
[1] "11307.28"
> mode(test1)
[1] "character"
> (test2 <- as.numeric(test1))
[1] 11307.28
> mode(test2)
[1] "numeric"
#这里已经是数值型了

　　接着上面处理一下exercise9_1$地区生产总值，

> (exercise9_1$地区生产总值 <- as.numeric(gsub(",","",exercise9_1$地区生产总值)))
 [1] 16251.93 11307.28 24515.76 11237.55 14359.88 22226.70 10568.83 12582.00
 [9] 19195.69 49110.27 32318.85 15300.65 17560.18 11702.82 45361.85 26931.03
[17] 19632.26 19669.56 53210.28 11720.87  2522.66 10011.37 21026.68  5701.84
[25]  8893.12   605.83 12512.30  5020.37  1670.44  2102.21  6610.05