2012-02-12 80 views
2

,我有以下數據:不匹配y軸的橫格蜱

x=c(2.880262,3.405859,3.613575,3.744480,3.682059,3.694075,3.758320,4.034290,4.202741,4.309383,4.996279,5.981309,5.103148,4.926363,4.696024,5.522913,5.330382,4.434304,5.154567,6.247156,8.612752,9.996526,9.606994,10.303496,5.954970,5.688171,6.340349,6.252854,6.355642,5.988570,7.317148,11.664384,14.231579,16.489029,23.100640,20.280043,21.562793,24.311327,23.735198,23.796386,23.118181,23.269722,19.886981,20.000975,19.967642,24.278910,17.447721,14.536114,20.646378,19.096832,20.258060,19.803196) 
y=1:52 
w=c(-2784,-2897,-2897,-2066,-2466,-2466,-2466,-2466,-2102,-2102,-2102,-2202,-2094,-2094,-2094,-2094,-1691,-1691,-1691,-1691,-1691,-1674,-1774,-1774,-2019,-2019,-2019,-2019,-2019,-1988,-1988,-1988,-1988,-1988,-1888,-1888,-1888,-1888,-1888,-1888,-1888,-1488,-2051,-2051,-2051,-2051,-2315,-2315,-2315) 
v=1:49 

當我試圖描繪出這些,我的網格不符刻度線。有沒有辦法解決這個問題?

plot(y,x,type='l',col='blue',log='y') 
grid(NA,NULL) 

所得的情節:

Image of plot with grid issue

而另一個情節:

plot(v,w,type='l',yaxt='n') 
grid(NA,NULL) 
axis(2,pretty(w),format(pretty(w)/1000,big.mark=',')) 

結果:

Image of plot with grid issue

我把這兩個,因爲我使用不同的技術來標記y軸,一個是日誌圖表,而另一個不是。順便說一下,我有數百個其他數據集將網格線放在刻度線上。這只是這兩個不匹配的網格蜱。

+0

從幫助頁面:「如果需要更多的微調,請直接使用abline(h =。,v =。)。」 – 2012-02-12 04:30:11

回答

2

對於第一個圖,只需使用equilogs=F

對於第二個情節,由於您使用的是非默認軸刻度,所以我認爲您必須使用abline,就像它在?grid中所述的那樣。祝你好運!

+0

這工作。另外,'abline(h = pretty(w),lty = 3,col ='gray')'適用於第二個示例。 – thequerist 2012-02-13 17:59:42