R语言制作图(文本属性、添加标题、图形边界、自定义坐标轴)
一、文本、标题属性
-
[外链图片转存失败,源站可能有防盗链机制,建议将图片保存下来直接上传(img-hrUIpkTC-1620140073356)(D:\大数据专业工具存放\Typora\Typora图片存放\image-20210425111042456.png)]
-
文本、标题作图
names(pdfFonts()) # 系统当前存在的字体 opar <- par(no.readonly = TRUE) # 将所有默认参数保存在一个opar向量中 par(pin=c(4,3)) # pin:设置坐标轴尺寸 par(lwd=2, cex=2) # lwd:设置线条样式,cex:设置绘制点时使用的符号大小 par(cex.axis=0.75, font.axis=3) # cex.axis:设置坐标轴刻度文字大小, font.axis:设置坐标轴文字字体样式 plot(dose, drugA, type="b", pch=20, lty=2, col="red", bg="red") # 制作图,参数一为x,参数二为y,其他为图样式 # pch:绘制点时使用的符号,lty:线条类型 # col:线条颜色,bg:图背景颜色 # title:直接添加标题,对标题进行设置 title(main="My Atitle", col.main="red") # main:设置主标题,col.main:设置主标题颜色 title(sub="My Asub", col.sub="red" ) # sub:设置副标题,col.sub:设置副标题颜色
二、边界、坐标轴属性
-
[外链图片转存失败,源站可能有防盗链机制,建议将图片保存下来直接上传(img-MUaCoZHv-1620140073358)(D:\大数据专业工具存放\Typora\Typora图片存放\image-20210425111329247.png)]
-
边界、坐标轴作图
x <- c(1:10) y <- x z <- 10/x par(mar=c(5, 4 , 4, 8)+0.1) plot(x, y, type="b", pch=2, col="red", yaxt="n", lty=2, ann=FALSE) # 制作图,参数一x,参数二y,参数三图类型 # pch:绘制点时使用的符号,col:线条颜色 # lty:线条类型 # yaxt="n":取消y轴刻度等所有属性 # ann="FALSE":取消x轴,y轴默认描述 # axis:修改坐标轴 axis(2, at=y, labels=x, col.axis="red", las=2) # axis:坐标轴函数,具体参数参考上图 # lines:在原图基础上再进行加一个图形 lines(x, z, type="b", pch=20, col="red", lty=2) # 制作图在原图上 axis(4, at=z, labels=round(z, digits=2), col.axis="red", las=2, cex.axis=.8) # labels:修改坐标轴大小 # round:取数组小数点后两位 title(main="坐标轴的例子", xlab="x轴", ylab="y轴" ) # 设置主标题,副标题
子", xlab=“x轴”, ylab=“y轴” ) # 设置主标题,副标题