2015-08-19 5 views
0

я ау ярлык, который должен сказать «Изобилие А. stutchburyi (# особей/0.50m 2 ^)», где # индивиды .... как предполагается чтобы быть второй линиейR: Потребность у этикетки быть две линии

Проблема в том, что я не могу заставить ее работать, так как я смешиваю разные шрифты (нормальные и курсивы). Обычно я использую \ п, но это не работает в выражении ..

Вот мой код, который только дает мне метку у на одной линии:

tsaplot <- barplot(tsa$No, beside = TRUE, 
        xlab = "Size groups (mm)", 
        ylab = expression(atop(paste("Abundance of",italic("A. stutchburyi"),"(# individuals/0.50m^2)"))), 
        cex.axis = 1.4, density = 50, font.lab = 2, font.axis = 2, cex.lab = .9, col = "black", 
        names.arg = c("0-2.0","2.1-4.0","4.1-6.0","6.1-8.0","8.1-10.0","10.1-12.0","12.1-14.0","14.1-16.0","16.1-18.0","18.1-20.0",">20.1"), 
        ylim = c(0,100), xpd = FALSE) 
+2

Мы нужны 'tsa' для воспроизводимого примера. Кроме того, ни R & RStudio, ни StackOverflow больше не оплачиваются для пробелов и новых строк. Нет необходимости делать код похожим на минимизированный javascript. – hrbrmstr

ответ

2

Вероятно, неполучение кронштейна:

tl <- bquote(atop(paste("Abundance of ",italic("A. stutchburyi")),"(# individuals/0.50"*m^2 ~ ")")) 

par(mar = c(5.1, 6.1, 4.1, 2.1)) 
plot(1, 1, t = "n", ylab = tl) 
text(1, 1, tl) 

enter image description here

С barplot:

enter image description here

+0

Я попробовал код, который вы предоставили, а также тот, который был предложен, но это только помещает «# индивидуумов ....» в качестве «силы (^)» первой части метки ... – user3679579

+0

Are вы уверены, что не смеетесь с ответом Яапа? Мой ответ работает хорошо. –

+0

Ahh, теперь это сработало, спасибо, спасибо! – user3679579

Смежные вопросы