R - 基線圖 - 如何去除X軸和Y軸線

我想擺脫R軸中的X和Y軸線，但它似乎不可能。我運行下面的代碼：R - 基線圖 - 如何去除X軸和Y軸線

par(mar=c(5,5,5,5), cex.main = 1.5, col.main = "gray30", bg="white", cex = 
0.8, family="Calibri", las=1) 
plot(y1~x, col=blk_blue, type="l", lwd=2, ylim = y1_limits, xlab = x_label, 
ylab = y1_label, las=1, axes=FALSE) 

rect(par("usr")[1], par("usr")[3], par("usr")[2], par("usr")[4], col = 
"gray90", border=NA) 
grid(nx = 5, ny = 5, col = "white", lty = "solid", lwd = 1) 
grid(nx = 10, ny = 10, col = "white", lty = "dotted", lwd = 1) 

par(new=TRUE, las=1, bty="n") 
plot(y1~x, col=blk_blue, type="l", lwd=2, ylim = y1_limits, xlab = x_label, 
ylab = y1_label) 

axis(side=1, col = "white", labels = FALSE) 
axis(side=2, col = "grey90", labels = FALSE, ylim = y1_limits) 
axis(side=3, col = "grey90", labels = FALSE, tick = FALSE) 
mtext(y2_label, side=4, line=3) 

par(new=TRUE, bty="n", las=1, bty="n") 
plot(y2~x, col=blk_red, type="l", lwd = 2, axes=FALSE, xlab = "", ylab="", 
ylim=y2_limits, las=1, xaxt="n") 
axis(side = 4, ylim = y2_limits, col="grey90")

所得圖表看起來像下面：

正如你可以看到有仍然在x軸的一些剩餘的黑色部分。我該如何刪除這些？

來源

2017-09-12 stratar

嘗試在每個繪圖語句中添加'bty =「n」'。否則，請提供一個[可重現的示例]（https://stackoverflow.com/a/5963610/4421870） – Mako212

該代碼給出錯誤，首先沒有名爲blk_blue的對象，那麼它是'object'y1_limits'not found'。還有其他缺失的物體。你可以請張貼他們的價值觀嗎？ –

謝謝瑞。 blk_blue只是一種顏色，你可以用「藍色」代替它。與blk_red相同。 y1_limits <-c（-3,9），y2_limits <-c（-150,200）。 – stratar

在您的通話繪製（...），設置軸= FALSE

在您的通話軸（...），組標籤= TRUE

我相信這解決了問題，它防止黑色軸線被繪製在第一位，但它仍然繪製沿着軸的數字。

來源

2017-09-12 18:08:48 Dustin

感謝賈斯汀。這就產生了另一個問題，即它將我的x軸日期轉換爲大整數，即14,000,16,000等。 – stratar

我上面的註釋可以使用axis.Date（）來解決。除了你的解決方案，所以我會標記你的答案是正確的。 – stratar

R - 基線圖 - 如何去除X軸和Y軸線

回答

相關問題