2012-05-17 157 views
37

Rで下地図を使用すると、地図上に緯度と経度の軸をプロットするときに、軸ラベルに上付き文字を追加するにはどうすればよいですか。R軸ラベルに上付き文字を使用

は、この例を考えてみましょう:

plot(-100:-50, 50:100, type="n", xlab="", ylab="", axes=FALSE) 
axis(1, seq(-100, -50, 10), labels=paste(abs(seq(-100, -50, 10)), "o", "W", sep="")) 
axis(2, seq(50, 100, 10), labels=paste(seq(50,100,10), "o", "N", sep="")) 
box() 

は、マップの周りに素敵なフレームを生成します。度記号を上付き文字にすることはさらに賢明です。

これは通常expression(paste(...))substitute()を使用して、このようなmtext()text()などの他のプロット関数で行うことができるが、この場合にはそれを行う方法?

+2

')は、この 'プロット(0、xlab =式(ペースト( '(SOCの['、KGM^-2を、]' い^ 0.25、sep = ''))) 'あなたの質問に答えますか? –

答えて

37

軸の場合も同様です。oが上付き文字として表示されます(*NはNも引き上げられないようにします)。

labelsX=parse(text=paste(abs(seq(-100, -50, 10)), "^o ", "*W", sep="")) 
labelsY=parse(text=paste(seq(50,100,10), "^o ", "*N", sep="")) 
plot(-100:-50, 50:100, type="n", xlab="", ylab="", axes=FALSE) 
axis(1, seq(-100, -50, 10), labels=labelsX) 
axis(2, seq(50, 100, 10), labels=labelsY) 
box() 
+0

プロットのテキストマークアップは、R実践のあいまいな部分です。それはいつも私を台無しにするようです。この明快さに感謝します。誰かがこれについての深いチュートリアルを開発していれば素晴らしいだろう。 – digitalmaps

+0

添字を示すために使用される文字は何ですか? – hendra

+2

@npo:角括弧( '?plotmath'を参照) –

23

これは簡単な例

plot(rnorm(30), xlab = expression(paste("4"^"th"))) 
+0

「瞬間」を上書きせずに「4番目の瞬間」のように、最後に上付きではないものを書く方法を教えてください。 – Pertinax

+0

@TheThunderChimp非常に遅れて返事を申し訳ありません。おそらくあなたはすでにこれを行う方法を理解しているかもしれませんが、これを行うことができます: 'plot(rnorm(30)、xlab = expression(paste(" 4 "^" th "、" moment ")))' – Alex

2

あり、この特定のケースでは、他のオプションは、度の記号を入力するために次のようになります。˚

Rは罰金それを処理するようです。 MacにOption-kと入力して入手してください。他のプラットフォームについてはわかりません。

+0

これはUnicode superscript 7(http://www.fileformat.info/info/unicode/char/2077/index.htm)のような他のシンボルでは機能しません。 – Pertinax

1

@The Thunder Chimp一部のセクションがスーパー(またはサブ)スクリプトの影響を受けるような方法でテキストを分割することができ、他は*を使用しないものもあります。あなたの例については、 "第4回" から単語 "瞬間" を分割すると -

plot(rnorm(30), xlab = expression('4'^th*'moment')) 
関連する問題