powerdesigner 设置默认值为0_使用R语言绘制plot图进行参数设置

#每次使用plot没有必要把那些默认的参数一一设置一遍，通常情况下使用plot绘图，如果对输出的图片当中某一个绘图元素的显示样式不太满意的话，找到对应的参数对它进行修改###################  全局绘图参数设置#保存默认绘图参数  par()#保留绘图参数默认值op#有时修改了默认参数，但是后来又需要最初的默认值，这时我们可以先把原始默认值存储到变量op中 par(op)  #恢复默认设置#获取绘图参数的值par("col")par()$col  #作用和上面一行的命令一样#设置par里面的参数会影响以后的所有绘图#设置改变绘图参数par(pch=11)  #修改绘图符号的默认值，通过par("pch")命令知道修改之前的默认值是1par(pch=11,col="red")  #同时对多个默认参数进行修改plot(rnorm(100))plot(rnorm(100),pch=2)#保存默认值op#保存默认值,如果出现警告: oppar(op)    #恢复默认设置dev.off()  #也可以关闭绘图设备来恢复par默认设置#常见在par中设置的绘图参数# mar=c(5.1,4.1,4.1,2.1),      #设置图形空白边界行数，mar = c(bottom, left, top, right)。默认为mar = c(5.1,4.1,4.1,2.1)。除单位为number of lines of text【即文字的行高，mex】外，其余与mai相同，默认行高(mex)为0.2 inches。# mai=c(1.02,0.82,0.82,0.42),  #设置图形空白边界尺寸，mai =c(bottom, left, top, right)，单位为英寸。默认为mai = c(1.02,0.82,0.82,0.42)。# oma=c(0,0,0,0),  #设置绘图区域周围的外边界行数，类似mar，默认值为0  参数形式为c(bottom, left, top, right)# omi=c(0,0,0,0),  #设置绘图区域周围的外边界宽度：outer margins in inches，其单位为英寸【1英寸=2.54厘米】# mfcol=c(1,1),  #分隔绘图区域多个，数值型向量c(nrow, ncol)。图按列排(mfcol)或按行排(mfrow)。# mfrow=c(1,1),  #同上#par一些常用的绘图参数设置margin宽度：mar mai ;  par(mar=c(5,5,4,2)+0.1)plot(0:10, 0:10, type="n", xlab="X", ylab="Y")text(5,5, "Plot Area", col="red", cex=1)box("plot", col="red") mtext("Figure", line=3, adj=1.0,cex=1, col="blue")box("figure", col="blue")#figure外边框设置 oma omipar(mar=c(5,4,4,2)+0.1, oma=c(2,2,2,2))plot(0:10, 0:10, type="n", xlab="X", ylab="Y")text(5,5, "Plot Area", col="red", cex=1)box("plot", col="red") mtext("Figure", line=3, adj=1.0,cex=1, col="blue")box("figure", col="blue")# 图片文件输出setwd("C:/Users/Administrator/Desktop/AP3")  #设置图片输出的工作路径png("myplot.png",width=4000,height=2000,res=300)  #res是分辨率，width/300得到图片的宽度，height/res得到图片的高度，单位是英寸par(mfrow=c(2,3),oma=c(2,2,2,2))plot(rnorm(100),col="blue",main="Plot No.1")plot(rnorm(100),col="blue",main="Plot No.2")plot(rnorm(100),col="green",main="Plot No.3")plot(rnorm(100),col="black",main="Plot No.4")plot(rnorm(100),col="green",main="Plot No.5")plot(rnorm(100),col="orange",main="Plot No.6")box("figure", col="blue")dev.off()pdf("myplot.pdf",width=10,height=8)par(mfrow=c(2,3),oma=c(2,2,2,2))plot(rnorm(100),col="blue",main="Plot No.1")plot(rnorm(100),col="blue",main="Plot No.2")plot(rnorm(100),col="green",main="Plot No.3")plot(rnorm(100),col="black",main="Plot No.4")plot(rnorm(100),col="green",main="Plot No.5")plot(rnorm(100),col="orange",main="Plot No.6")box("figure", col="blue")dev.off()

内容来源：组学大讲堂