Question

我希望以粗体显示“10 ^ 4点”作为我的x轴标签。

我知道如何用粗体制作一个简单的标签：

plot(1:10, xlab="")
mtext(text="10 points", side=1, font=2, line=3)

感谢this answer，我知道如何制作一个10的幂标签，但没有任何粗体：

mtext(text=expression(paste(10^4, " points")), side=1, font=2, line=3)

感谢this answer，我也知道如何制作带有希腊字母的标签：

mtext(text=expression(bold(paste(beta, "=", 10^1, " points"))), side=1, line=3)

但是十大的力量仍然不是大胆的！

它对bquote：

无效

mtext(text=bquote(bold(10^1~points)), side=1, line=3)

有什么想法吗？

以下是我的系统的一些细节。如果您还有其他需要，请告诉我。

> sessionInfo()
R version 2.15.0 (2012-03-30)
Platform: x86_64-redhat-linux-gnu (64-bit)

locale:
 [1] LC_CTYPE=en_US.UTF-8       LC_NUMERIC=C              
 [3] LC_TIME=en_US.UTF-8        LC_COLLATE=en_US.UTF-8    
 [5] LC_MONETARY=en_US.UTF-8    LC_MESSAGES=en_US.UTF-8   
 [7] LC_PAPER=C                 LC_NAME=C                 
 [9] LC_ADDRESS=C               LC_TELEPHONE=C            
[11] LC_MEASUREMENT=en_US.UTF-8 LC_IDENTIFICATION=C       

attached base packages:
[1] stats     graphics  grDevices utils     datasets  methods   base

Answer 1

诀窍是使用“4”而不是数字4。

mtext(text=expression(paste(10^bold("4"), " points")), side=1, font=2, line=3)

顺便说一下，这是另一种情况，即不需要plotmath paste：

mtext(text=expression(10^bold("4")~points), side=1, font=2, line=3)

我看到你引用了我之前在plotmath上发布的一篇文章，发现Ripley教授2010年帖子的链接是旧的finzi服务器，它不再为rhelp搜索带来负担。我updated that link。

在R中，如何在绘图标签中以粗体字体获得10的幂？

1 个答案: