R语言实现手动设置xy轴刻度的操作

151 阅读 0 评论 100 点赞

我是靠谱客的博主从容香水，最近开发中收集的这篇文章主要介绍R语言实现手动设置xy轴刻度的操作，觉得挺不错的，现在分享给大家，希望可以做个参考。

概述

在R中，plot函数作图时会自动给出xy轴的刻度标度，如下图:

有时我们需要自己定义xy轴的刻度，这时我们可以用axis中的at和labels参数来更改。

首先，我们先令plot不要画出xy轴的标度

然后，用axis函数设置xy轴的刻度

这样xy轴的刻度就完全按照我们自己的意愿显示了，也可以设置at参数不是均匀的，总之，用这两个参数就可以完全自己控制xy轴的刻度显示了

补充：R语言自定义坐标轴示例

我就废话不多说了，大家还是直接看代码吧~

x <- c(1:10)
y <- x
z <- 10/x 
opar <- par(no.readonly=TRUE) 
par(mar = c(5,4,4,8)+0.1) 
plot(x, y, type="b",
 pch = 21, col = "red",
 yaxt = "n", lty = 3, ann = FALSE) 
lines(x, z, type = "b", pch = 22, col = "blue", lty = 2) 
axis(2, at = x, labels = x, col.axis = "red", las = 2) 
axis(4, at = z, labels = round(z, digits = 2),
 col.axis = "blue", las = 2, cex.axis = 0.7, tck = -0.03) 
mtext("y = 1/x", side = 4, line = 3, cex.lab = 1, las = 2, col = "blue") 
title("An Example of Creative Axes",
 xlab = "X values",
 ylab = "Y = X") 
par(opar)

生成的图片如下：