R中的軸刻度線重新定位

Question

我有一個問題，即刻度線在哪裏落在我正在放置的熱圖上的軸上。下面是生成我目前正在獲得的代碼以及我想要實現的圖像的代碼。我知道它可能在ggplot2中（請參閱：shifting tick positions in ggplot2），但我想用基本的R軟件包來做。謝謝。

colfunc <- colorRampPalette(c("white", gray(.3, alpha = NULL))) 
colorBarz=matrix(seq(0,7,len=14),nrow=1) 
colorBarx=1 
colorBary=seq(0,7,len=14) 
cus_breaks=c(seq(0,7,len=15)) 
image(colorBarx,colorBary,colorBarz,col=colfunc(14),axes=FALSE,xlab="",ylab="",breaks=cus_breaks,cex.lab=2) 
box(which="plot") 
axis(2,at=seq(from = 0, to = 7, by = 1),las=2,cex.axis=2) 

Answer 1

將這項工作？

colfunc <- colorRampPalette(c("white", gray(.3, alpha = NULL))) 
colorBarz=matrix(seq(0,7,len=14),nrow=1) 
colorBarx=1 
colorBary=seq(0,7,len=15) 
cus_breaks=c(seq(0,7,len=15)) 
image(colorBarx,colorBary,colorBarz,col=colfunc(14),axes=FALSE,xlab="",ylab="",breaks=cus_breaks,cex.lab=2,ylim=c(0,7)) 
box(which="plot") 
axis(2,at=seq(from = 0, to = 7, by = 1),las=2,cex.axis=2)