baoshandate<-read.csv("C:/Users/510/Desktop/p3/amcsv/baoshan.csv",header=TRUE,sep=",")
usebaoshandate<-format(baoshandate,digits=10)
sorts<-apply(usebaoshandate,2,sort);sorts
sums<-apply(sorts,2,sum);sums
结果
> sums<-apply(sorts,2,sum);sums
Error in FUN(newX[, i], ...) : invalid 'type' (character) of argument
>
为什么啊