在rstudio中用lapply和gsub替换特殊字符

Question

我正在尝试通过应用以下代码来清理数据：

Manuf <- lapply(Manuf, gsub, pattern ='%', replacement ='')
Manuf <- lapply(Manuf, gsub, pattern='\\$', replacement ='')

我注意到应用代码的那一刻，它将数据转换为值。 （从具有366个观察值的数据（包含14个变量）到14个列表的值）。当我应用此代码来指定从字符到数字的列时，这引起了一个问题。

Manuf[, c(4:7,13:14)] <- sapply(Manuf[, c(4:7,13:14)], as.numeric)

返回错误“尺寸错误” 替换字符时，如何避免数据库更改为List？ 有什么建议么？

非常感谢您

Answer 1

您可以使用

Manuf[] <- lapply(Manuf, gsub, pattern = '[$%]', replacement ="") 

[$%]模式将从数据框中删除$和%符号。