如何在ggplot facet_wrap文本中添加数学符号？

Question

This question解释了如何在绘图中添加数学符号。但是，当文本应该存储在数据框本身中时，这不起作用。这是出现在facet_wrap子图的小框中的文本的情况。

这是一个可重复的例子。比方说，我有这个数据用T和m³，我想画一个这样的情节。

library(ggplot2)
dtf <- data.frame(year = rep(1961:2010,2),
                  consumption = cumsum(rnorm(100)),
                  item = rep(c("Tea bags","Coffee beans"),each=50),
                  unit = rep(c("T","m^3"),each=50))
ggplot(data=dtf)+
    geom_line(aes(x=year, y=consumption),size=1) +
    ylab(expression(paste("Consumption in T or ",m^3))) +
    scale_x_continuous(breaks = seq(1960,2010,10)) +
    theme_bw() + facet_wrap(item~unit, scales = "free_y")

ylab(expression(m^3))正确显示单位。如何在刻面上显示类似的m³？

Answer 1

将LAST=/a/b; while [ ! -z "$LAST" ] ; do NEXT=`echo "$LAST" | sed 's/[^\/]*$//' | sed 's/\/$//'`; ls "$NEXT" 2> /dev/null > /dev/null; if [ $? -eq 0 ] ; then echo "Can't access: $LAST"; break; fi; LAST="$NEXT"; done 添加到您的labeller = label_parsed功能，将您的设备格式设为facet_wrap，并将标签中的空格替换为m^3

~