在R中:从字段中删除逗号并使修改后的字段保留为数据帧的一部分

Question

我需要从R数据帧中的字段中删除逗号.从技术上讲,我已经设法做到这一点,但结果似乎既不是矢量也不是矩阵,我无法以可用的格式将其恢复到数据帧中.那么有没有办法从字段中删除逗号,并且该字段仍然是数据帧的一部分.

以下是需要删除逗号的字段示例,以及我的代码生成的结果:

> print(x['TOT_EMP'])
         TOT_EMP
1    132,588,810
2      6,542,950
3      2,278,260
4        248,760

> y
[1] "c(\"132588810\" \"6542950\" \"2278260\" \"248760\...)"

所需的结果是一个数字字段:

       TOT_EMP
1    132588810
2      6542950
3      2278260
4       248760

x<-read.csv("/home/mark/Desktop/national_M2013_dl.csv",header=TRUE,colClasses="character")
y=(gsub(",","",x['TOT_EMP']))
print(y)

Answer 1

gsub()将返回一个字符向量,而不是一个数字向量(这听起来像你想要的).as.numeric()将字符向量转换回数字向量:

> df <- data.frame(numbers = c("123,456,789", "1,234,567", "1,234", "1"))
> df
      numbers
1 123,456,789
2   1,234,567
3       1,234
4           1
> df$numbers <- as.numeric(gsub(",","",df$numbers))
> df
    numbers
1 123456789
2   1234567
3      1234
4         1

结果仍然是data.frame:

> class(df)
[1] "data.frame"