値 "0"のラベルのみがPlot（）内のティックの中心にはありません

Question

私は通常のplot()をRで使用しています。

は、しかし、他のすべてがOK探しているのに対し、値が「ゼロ」のラベルが正しく、対応する目盛りを中心に揃え（センタリング）されていないことが起こります。 （は、スクリーンショットは、以下のリンクを参照してください。）

• をそれだけでたまたま、私が使用している場合、 "科学的= FALSE" 形式（...）で
• 私は "=科学的TRUE" を使用する場合には、正しいよう

ゼロは中央に配置されずに右に揃えられ、Rは他の大きな数字（「100 000」など）と同じ桁数で「ゼロ」があると信じています「0 000」だけではなく「000 000」が中央に揃えられます。私にできることは容易

何か？

最小限の実施例：

plot(x=NULL, y=NULL, xlab="xlab", ylab="ylab" 
     , xlim=range(2007:2014), ylim=range(0:500000), axes=FALSE) 
     box() 
     ticks_x <- pretty(2007:2014,n=6) 
     ticks_y <- pretty(0:500000,n=8) 

     labels_x <- format(ticks_x) 
     labels_y <- format(ticks_y , big.mark = " " , decimal.mark=",", scientific=FALSE) 

     axis(1, at = ticks_x, labels = labels_x) 
     axis(2, at = ticks_y, labels = labels_y) 

スクリーンショット：

任意の提案方法を "中央" "ゼロ" に、科学的なモードが使用されていない場合？プロットは、ループ内に作成されるため

「テキストとして挿入」または同様と手動溶液は、不可能である、とのみ時にはゼロが発生するが、それは常に間違って整列されます。

ありがとうございます！

Answer 1

軸ラベルは文字列です。あなたの現在のlabels_yでチェックを持っている：

#[1] "  0" " 50 000" "100 000" "150 000" "200 000" "250 000" "300 000" 
#[8] "350 000" "400 000" "450 000" "500 000" 

あなたは0のラベルが" 0"であるという理由だけで、望ましくないアライメントを取得します。

labels_y[1] <- " 0 " 
## or simply: labels_y[1] <- "0" 
axis(2, at = ticks_y, labels = labels_y) 

Answer 2

だけaxis(2, at = ticks_y-50000, labels = labels_y)を使用しています。自動化したい場合は、par（ "usr"）を使用して範囲に応じて移動することができます。

Answer 3

最終的な解決策：この問題はで固定することができ、「labels_y <間... ...

[...] 
    labels_y <- format(.... 
if(as.numeric(ticks_y[1]) == "0"){labels_y[1] <- "0"} 
    axis(2,.... 
[...] 

を紹介

- ... "および『軸（...』トリックを行います！