####图形参数
head(cars)
cars<-cars[c(1:10),]
cars1<-data.frame(speed=2*cars[,1],dist=2.5*cars[,2])
head(cars1...)
plot(cars1dist~cars1speed, #y~x
main="速度与路程的关系图", #标题
xlab="速度 公里/每小时", #x轴标题
ylab="路程(公里)", #y轴标题...=2,cex.lab=1.5, #各种字体的大小
col="blue", #颜色
pch=19,cex=1) #pch代表点的形状,数字表示
abline(lm(cars1dist~cars1speed...cars1),cex=0.6,pos=4,col="green")
text(5,40,expression(novogene^2))
text(6,50,expression(gwas[2]))
####图形边距和图形布局...外边框蓝色
box("outer",col="blue")
par(mfrow=c(3,2)) #一张图上3行2列
windows() #新建一个绘图窗口,不覆盖
内容整理来自:微信公众号R语言中文论坛