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

来自:网络
时间:2021-04-01
阅读:

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

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

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

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

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

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

R语言 实现手动设置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) 

生成的图片如下:

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

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

返回顶部
顶部