표현식이 포함 된 가로 플롯 범례의 텍스트를 수직으로 정렬

Question

플롯 범례에 bquote가있는 표현식을 사용하면 지수 다음의 텍스트가 나머지 범례와 수직으로 정렬되지 않습니다.

예 :

sometext <- 'bar' 
e <- bquote(expression(.(sometext)^3~'Hello')) 
plot(1) 
legend('top',legend = c('foo', eval(e), 'world'), horiz = T, cex=0.9,xpd=T, bg='wheat') 

Answer 1

라인이없는

또는 채우기, 응답은 문의하지 분리 된 부분이다. 범례에 기호가 사용 된 경우에는 작동하지 않습니다.

plot(0) 

e <- bquote(expression('foo'~~~.(sometext)^3~'Hello'~~~'world')) 

legend('top',legend = eval(e), horiz = T, cex=1,xpd=T, bg='wheat') 

은 지금까지 전설 심볼을 포함하는 것으로,이 질문에 답이 남아있다.