私はこうして生成されたプロットを持っています:
ggplot(dt.2, aes(x=AgeGroup, y=Prevalence)) +
geom_errorbar(aes(ymin=lower, ymax=upper), colour="black", width=.2) +
geom_point(size=2, colour="Red")
次のようにx軸のラベルを制御します。
scale_x_discrete(labels=c("0-29","30-49","50-64","65-79",">80","All")) +
これは機能しますが、「> 80」ラベルを「≥80」に変更する必要があります。
ただし、「≥80」は「= 80」と表示されます。
等号を表示するにはどうすればよいですか?
式を使用する代わりにUnicode文字を使用します。この場合、Unicode文字「GREATER-THAN OR EQUAL TO」(U + 2265)。@ mnelの例をコピーする
.d <- data.frame(a = letters[1:6], y = 1:6)
ggplot(.d, aes(x=a,y=y)) + geom_point() +
scale_x_discrete(labels = c(letters[1:5], "\u2265 80"))
Unicodeは、複雑な式の構文を覚えるのが難しい場合や、式で許可されていない改行を必要とする場合に適した代替手段です。欠点として、特定のUnicode文字が機能するかどうかは、選択したグラフィックデバイスとフォントによって異なります。
phantom(...)
へのlabel
引数内で先頭の_>=
_を偽造する式(scale_x_discrete(...)
を含む)を渡すことができます
例えば
_ .d <- data.frame(a = letters[1:6], y = 1:6)
ggplot(.x, aes(x=a,y=y)) + geom_point() +
scale_x_discrete(labels = c(letters[1:5], expression(phantom(x) >=80))
_
数式の作成の詳細については_?plotmath
_を、そして this 関連SO質問と回答