R语言--图形基本使用2

1 图形标题的修改

输入数据:

dose<-c(20,30,40,50,60)

drugA<-c(16,20,27,40,60)

drugB<-c(15,18,25,31,41)

plot(dose,drugA,type="b",col="red",lty=2,pch=2,lwd=2,main="Clinical",sub="This is dose",xlab="dose-xx",ylab="drugA--yy",xlim=c(0,60),ylim=c(0,70))

解释:col设置线条的颜色,lty设置线条类型,为2意思是虚线,pch=17意思是三角标识lwd是设置线条的宽度,main设置图形标题,sub设置子标题,xlab设置横坐标轴名字,ylab设置轴坐标轴名字,xlim设置横坐标轴刻度区间,ylim设置纵坐标轴刻度区间

 

(2) 图形绘制与标题设置分开

plot(dose,drugA,type="b",col="red",lty=2,pch=2,lwd=2)

title(main="Clinical",sub = "This is dose",col.main="red",col.sub="blue")

2 图形坐标轴的修改

输入数据:

x<-c(1:10)

y<-x

z<-10/x

(1)把原始格式参数先保存

opar<-par(no.readonly = T)

(2)坐标轴修改

plot(x,y,type="b",pch=21,col="red",yaxt="n",lty=3,ann=F) #type设置为折线图,col设置线条颜色,yaxt设置y轴隐藏(不显示),lty设置线条类型(点画线),
ann设置其他可能存在的标题为不显示

lines(x,z,type = "b",pch=22,col="blue",lty=2) #type设置为折线图,pch设置线条中间符号的标识,col设置线条颜色,lty设置线条类型(点画线)

 

 axis(2,at=x,labels=x,col.axis="red",las=2)  #第一个参数:1,2,3,4代表下左上右,2设置左侧坐标轴,at=x表示画的刻度线是x,,labels=x设置标签为x,
col.axis设置坐标轴刻度的颜色,las=2设置坐标轴刻度垂直  

 

axis(4,at=z,labels=round(z,digits=2),col.axis="blue",las=2,cex.axis=0.7,tck=.01) 

#4设置右侧刻度线,at=z代表画的是z的刻度线,labels设置标签对z取两位小数,col.axis设置坐标轴刻度的颜色,las=2设置坐标轴刻度垂直,cex.axis设置刻度标识大小,tck设置两位小数  

 

mtext("y=1/x",side=3,line=3,cex.lab=1,las=1,col="blue")

title("An Example",xlab = "XX",ylab="YY") 

#y=1/x函数名,side=3代表在图形上方显示函数,line=3,cex.lab是设置坐标轴字体大小,las=设置函数横向显示,col设置颜色,title设置主标题和横纵坐标标题

 

abline(h=c(1,5,7))

abline(v=seq(1,10,2),lty=2,col="blue")  #abline是画参考线

 

(3)恢复原始格式参数

par(opar)
posted @ 2021-07-02 15:40  zhang-X  阅读(725)  评论(0)    收藏  举报