问生信分析时，做表达差异分析基因去重步骤出现R报错如何处理？

setwd("C:\\try\\step 5")

inputFile="symbol.txt"

rt=read.table(inputFile,sep="\t",header=T,check.names=F)

rt=as.matrix(rt)

rownames(rt)=rt[,1]

exp=rt[,2:ncol(rt)]

dimnames=list(rownames(exp),colnames(exp))

data=matrix(as.numeric(as.matrix(exp)),nrow=nrow(exp),dimnames=dimnames)

最后一步报错： length of 'dimnames' [2] not equal to array extent

请问是怎么回事