相关疑难解决方法(0)

我想绘制一个看起来像这样的标签ggplot2:

Value is $\sigma$, R^{2} = 0.6Value is普通字体在哪里,$\sigma$是一个希腊小写的西格玛字母,R^{2} = 0.6显示为R带有上标2后跟等号(=)后跟的0.6.如何在ggplot factor和xlab,ylabR之类的参数中使用它？

我想expression在一个ggplot2方面标签上有一个R.

假设我正在策划tips data.frame:

library(reshape2)
> head(tips)
  total_bill  tip    sex smoker day   time size
1      16.99 1.01 Female     No Sun Dinner    2
2      10.34 1.66   Male     No Sun Dinner    3
3      21.01 3.50   Male     No Sun Dinner    3
4      23.68 3.31   Male     No Sun Dinner    2
5      24.59 3.61 Female     No Sun Dinner    4
6      25.29 4.71   Male     No Sun Dinner    4

如下:

library(ggplot2)
sp <- ggplot(tips, aes(x=total_bill, y=tip/total_bill)) + 
         geom_point(shape=1) + 
         facet_wrap(~sex, ncol = …

是否可以为ggplot2中使用的每个变量设置独立的条带主题facet_wrap？

以这段代码为例:

p1 <- ggplot(mpg, aes(displ, hwy)) +
   geom_point() +
   facet_wrap(c("cyl", "drv"), labeller = "label_both")
plot(p1)

我希望上面的条带('cyl')具有不同的主题 - 比方说,用粗体.另外,我可能想制作'drv'斜体并使用不同的字体类型和大小.我怎么能这样做？

我正在考虑以下几点:

 p1 <- p1 + theme(strip.text.variable1 = element_text(face = 'bold'),
                  strip.text.variable2 = element_text(face = 'italic', size = 8)
                  )

不幸的是,我在文档或之前的问题中找不到这样的内容.

干杯

编辑:我提出了一个更普遍的问题,以进一步帮助社区.

x<-c(0.2,0.4,0.8,2.3)
y4<-c(190.66,185.55,188.53,187.51)
par(mar=c(2.0,4.5,0.5,2.5))
plot(x,y4,type="l",xaxt="n",yaxt="n",col="navy",frame=F,lwd=2,
 xlab="levels(ppm)",ylab=expression(bold(paste("HOMA-",beta,"(%)"))),font.lab=2, 
 xlim=c(0,2.5),ylim=c(185,195))
axis(1,at=c(0,0.5,1.0,1.5,2.0,2.5),lwd=2)
axis(2,at=c(185,190,195),lwd=2)
abline(h=190.66,lty=2)
text(2.0,192, "P for trend<0.01",cex=0.75)

如何使轴标签中的 beta 斜体和粗体以及文本中的 P 斜体和粗体？谢谢。