tiff(filename = "c:\\aaa.tiff",
res = 800, pointsize = 2)
plot(1:100)
dev.off()
1 tiff(file=paste0(out_dir,"/1.bulkprior.Liver.tif"),compression="lzw",units="in",res=1000,pointsize=8,height=6,width=6)
2 mar.default <- c(5,4,4,4) + 0.1
3 par(mar = mar.default + c(0, 2, 0, 0))
4 plot(GSScore$Liver.SpecificScore,GSScore$HCC.TvsN.HCCDB,pch=16,cex=0.8,
5 cex.lab = 3,cex.axis=2,xlab = "Liver-specific metric",ylab = "Deregultaion metric")
6 abline(v=0,h=0,col="gray")
7 abline(h=c(-0.5,0.5,-1),v=4,col="red")
8 dev.off()
compression="lzw"，LZW是一种无损压缩格式，不会丢失任何数据，但肯定会减少文件大小
