问为什么会提示二进列运算符中有非数值参数？

geo_data<-read.table("data.txt",sep="\t",header=T)

geo_data<-as.matrix(geo_data)

rownames(geo_data)=geo_data[,1]

geo_exp<-geo_data[,2:ncol(geo_data)]

dimnames<-list(rownames(geo_exp),colnames(geo_exp))

geo_exp<-matrix(as.numeric(as.matrix(geo_exp)),nrow=nrow(geo_exp),dimnames=dimnames)

pdf(file="raw_box.pdf")

boxplot(geo_data,col = "green",xaxt = "n",outline = F)

Error in x[floor(d)] + x[ceiling(d)] : 二进列运算符中有非数值参数

为什么会出现这个错误呢 我该如何修改代码

原始数据如下