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) 

生成的圖片如下:

以上為個人經驗,希望能給大傢一個參考,也希望大傢多多支持WalkonNet。如有錯誤或未考慮完全的地方,望不吝賜教。