各位大佬，本小白准备对数据进行标准化处理，输入数据后，代码书写如下，显示错误，删除第一列的字符后，第一列数据未读入，请问应该如何解决？十分感谢各位大佬

data<-read.table("exp2.csv",row.names= 1,header=TRUE,sep=',')

head(data)

dim(data)

data<-as.matrix(data)

data=data.frame(scale(data))

head(data)