data=read.table("TCGA_COAD_count,txt.txt",header=T,sep="\t",check.names=F,row.names=1)
dimnames=list(rownames(data),colnames(data))
data=matrix(as.numeric(as.matrix(data)),nrow=nrow(data),dimnames=dimnames)
group=sapply(strsplit(colnames(data),"\\-"),"[",4)
group=sapply(strsplit(group,""),"[",1)
group=gsub("2","1",group)
conNum=length(group[group==1])
treatNum=length(group[group==0])
Type=c(rep(1,conNum),rep(2,treatNum))
data1=data[,group==1]
data2=data[,group==0]
data=cbind(data1,data2)
请问上述转化为matrix来进行统计操作后该怎么变成文本文件读出