如何將小刻度標記添加到除主標記之外的軸？

Question

我有兩個問題。

1. 我想知道如何可以添加兩個字，代替「0」一個出現，其他出現代替「10」在X軸和Y軸而保留軸（即1到9）的剩餘數字？
2. 如何在兩個軸上添加小刻度標記？

這裏是我R代碼裏面，沒有成功：

plot(0:10,0:10,type="n",axes=FALSE,xlab="JBL",ylab="PRAC") 

axis(side=1,at=c("AL",1,2,3,4,5,6,7,8,9,"BL"),las=1) 
axis(side=2,at=c("CL",1,2,3,4,5,6,7,8,9,"DL"),las=1) 
box() 

Answer 1

對於第一個問題，你應該使用labels不at。閱讀?axis。

對於第二個，您可以在同一軸上調用axis或Axis兩次，但使用rug更容易。它是Axis的包裝函數。例如，你可以這樣做：

plot(0:10, 0:10, axes = FALSE) ## `axes` is an argument to `plot.default` 
axis(1, at = 0:10, labels = c("AL",1,2,3,4,5,6,7,8,9,"BL")) 
rug(x = 0:9 + 0.5, ticksize = -0.01, side = 1) 
axis(2, at = 0:10, labels = c("CL",1,2,3,4,5,6,7,8,9,"DL")) 
rug(x = 0:9 + 0.5, ticksize = -0.01, side = 2) 

你可以看到如何rug作品在它的源代碼：

Axis(side = side, at = x, labels = FALSE, lwd = 0, lwd.ticks = lwd, 
    col.ticks = col, tck = ticksize, ...) 

讀?par如何tck作品。軸的默認值tck爲-0.02，所以如果您希望較小的值爲「副軸」，請將其設置爲一半。這裏，標誌表示方向。積極值給滴答指向劇情內，而負數給滴答指向劇情。