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) 

生成的图片如下：

以上为个人经验，希望能给大家一个参考，也希望大家多多支持。如有错误或未考虑完全的地方，望不吝赐教。