var_name <- names(rawdata)
var_name <- var_name[-c(2,3,5)] #第2列第3列和第5列明显不是数值型，这里变量只选择数值型
rawdata <- dplyr::mutate_at(rawdata,var_name,function(x) as.numeric(as.character(x)))
str(rawdata)
#然后不是数值型的列单独转换成字符型就可以了
rawdata$NAME <- as.character(rawdata$NAME)
rawdata$TEAM <- as.character(rawdata$TEAM)
#然后第五列也可以参照上面转换成字符型或者使用lubridate包转换成时间型数据
#rawdata$`M/G` <- as.character(rawdata$`M/G`)
#rawdata$`M/G` <- lubridate::ms(rawdata$`M/G`)

额啊 忘了那个美元符号显示不出来 就dollars选变量这个应该懂的吧

data%>%mutate_if(is.facter, as.character)%>%mutate_if(is.character, as.numeric)%T>%str->data
最好上传你的数据，不少数据是富文本格式，光看代码，不行的。

老师，你好。数据来源于网页，读取之后我发现没法处理，因为都是元素都是因子型的，所以就想把它批量转为数值型的。