在每个相关列上应用一个函数,该函数用空字符串替换分号,然后转换为数字。
# test data
DF <- data.frame(A = 1:2, B = c(";3", ";4"), C = c(";6", ";7"))
DF[2:3] <- lapply(DF[2:3], function(x) as.numeric(sub(";", "", x)))
给予:
> DF
A B C
1 1 3 6
2 2 4 7
在 Excel
之内
选择工作表中的所有单元格,从功能区中下拉“查找/替换”对话框,然后删除所有 ; :