2012-11-02 22 views
25

ben böylece oluşturulan bir arsa var:bir eşit veya daha büyük işareti gösteriliyor

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") 

böyle x ekseni etiketleri kontrol:

scale_x_discrete(labels=c("0-29","30-49","50-64","65-79",">80","All")) + 

Bu işler ama değişmek gerek "> 80" etiketi "≥80" olarak.

Ancak "≥80", "= 80" olarak görüntülenir.

Büyük veya eşittir işaretini nasıl görüntüleyebilirim?

+0

Eğer "> = 80" gelebilir miyim? –

+2

@JanDvorak, maalesef değil. Bu yayın için, bu yüzden mümkün olduğunca iyi görünmesi gerekiyor. Ben> 79 ile gitmek istedim ama kıdemli yazarlar özellikle istiyoruz ≥80 –

+6

ifade denediniz (""> = 80) '? "Arsa grafiği" konusuna bakın. – plannapus

cevap

23

İfadeleri kullanmak için bir alternatif Unicode karakterleri, bu durumda Unicode Karakter 'GREATER-THAN VEYA EQUAL TO' (U + 2265) 'dir. Sorun karmaşık ifade sözdizimi hatırlamakta varsa veya kopyalama @ mnel örneğinin

.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 iyi bir alternatiftir Eğer ifadeleri izin vermez linebreaks, gerekiyorsa. Bir dezavantaj olarak, belirli Unicode karakterlerinin çalışıp çalışmadığı, grafik aygıtınıza ve seçtiğiniz yazı tipine bağlıdır.

+1

Sorun: 'pdf' aygıtı bu karakteri desteklemiyor ve yazdırıyor ... yerine. "Ggplot" içinde çalışmıyorum, bu belki bu paketin içinde bir sorun değil, fakat tabandan tasarruf etmek zordur. – MichaelChirico

+3

@MichaelChirico: Çözüm: pdf'yi kullanmak için zorlayıcı bir nedeniniz olmadıkça, cairo_pdf kullanın 'yerine. – otsaw

+0

Böyle zorlayıcı bir nedenin ne olabileceğine dair bir örnek verebilir misiniz? – MichaelChirico

17

için matematiksel oluşturma hakkında daha fazla bilgi için ?plotmath Örneğin bkz

.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)) 

enter image description here

için içinde lider >=label argüman scale_x_discrete(...)

için sahte phantom(...) içeren bir ifade (geçebilir ifadeler ve this ilgili SO soru ve yanıtı

4
plot(5, ylab=expression("T ">="5")) 

enter image description here

İlgili konular