> sink("intersect.txt") ####建立文件名
> length(intersect(dgeseq1[,1],cuff1[,1])) ####要输出的内容
> sink() ####输出
要是输出的格式不是窗口显示的形式时:
write.table(inter,"inter.txt",col.names=F,row.names=F,quote=F,sep="\t")、
#inter:输出的内容
#inter.txt:输出的文件名
> sink("intersect.txt") ####建立文件名
> length(intersect(dgeseq1[,1],cuff1[,1])) ####要输出的内容
> sink() ####输出
要是输出的格式不是窗口显示的形式时:
write.table(inter,"inter.txt",col.names=F,row.names=F,quote=F,sep="\t")、
#inter:输出的内容
#inter.txt:输出的文件名
转载于:https://www.cnblogs.com/blueicely/archive/2012/12/13/2816942.html