如何使 R 的 bquote 中的字体为粗体以显示主要情节？

Posted 2023-03-06

【中文标题】如何使 R 的 bquote 中的字体为粗体以显示主要情节？

【英文标题】：How to make the font bold in R's bquote for main of plot?

【发布时间】：2015-02-14 02:47:33

【问题描述】：

我用 R 绘制了一些图并使用 bquote，因为我需要变量作为图的主要部分。但是，主要不再是粗体，但我希望它是粗体的。我将主要定义如下：

title = bquote(atop("Empirical Pricing Kernel at Date",~.(EndDate)~"with Index Price"~.(ST)~"€"))

情节（温度，EPK，类型=“l”，主要=标题）

Enddate 包含 "2014-08-01" 作为日期，ST 只是带​​有 9210.08 的数字。

有没有办法让它加粗或不加bquote？我想用bquote 找到一个解决方案，因为它在使用下标时非常方便。

我的问题是我在一个有两个地块的 par-plot 中使用它，而另一个地块不需要特殊的东西。所以，主要是粗体。我什至试着在它周围加上bquote 以获得相同的字体大小，但它保持粗体。

【问题讨论】：

您是否只将一个参数传递给atop()？你真的需要那个吗？看起来您在这里没有使用任何plotmath。你不能只是paste() 价值观吗？如果此示例实际上是 reproducible 会有所帮助，这样我们就可以确切地知道您所引用的每个变量中的内容。

我编辑了答案并添加了我正在使用的变量的内容。当我使用粘贴时，它不会给我变量的值。我需要atop，因为我需要换行，而且没有在行的顶部没有正确居中。

最后几句话对我来说没有意义，但我希望提供的解决方案能够解决问题，让您更好地掌握如何使用表达式。

是的，您的解决方案解决了问题。因此，接受并投票赞成。谢谢！

【参考方案1】：

我更喜欢使用我认为的“纯情节数学”，所以我使用波浪号而不是空格并且不使用引号。我怀疑是 bquote 的第二个参数中的领先波浪号引发了错误。在 plotmath 中，波浪线的两边都需要一些东西：如果你真的需要一个不显示的东西，你总是可以使用 phantom(0) 但为什么要在这种情况下麻烦呢？

bquote(atop(Empirical~Pricing~Kernel~at~Date, 
            bold(.(EndDate))~with~Index~Price~.(ST)~"€"
       )   )

测试：

EndDate="2014-08-01";ST=9210.08
title = bquote(atop(Empirical~Pricing~Kernel~at~Date, bold(.(EndDate))~with~Index~Price~.(ST)~"€"))
   plot(1,1, type="l", main = title)

【讨论】：

仿照@42的例子，能不能把变量ST加粗？我试过包装bolditalic(.(ST))，但没有成功。有什么想法吗？

我没有立即看到失败的原因，因为“点”-函数应该在 plotmath-函数中工作。说“没有成功”在调试过程中并不是特别有用。您需要描述 ST 的类别和您使用的代码。也许您应该使用minimal reproducible example 提交问题。

感谢您的回复。这就是我所做的：EndDate="2014-08-01";ST=9210.08; title = bquote(atop(Empirical~Pricing~Kernel~at~Date, bold(.(EndDate))~with~Index~Price~bolditalic(.(ST))~"€")); plot(1,1, type="l", main = title) 但是，变量 ST 没有显示为粗斜体。

哦。现在我想起了。 bolditalic 不会打印数字。 （请参阅?plotmath 页面。）需要引用该十进制数。那么应该会成功。

谢谢，现在它的工作原理是这样的：EndDate="2014-08-01";ST=9210.08; title = bquote(atop(Empirical~Pricing~Kernel~at~Date, bold(.(EndDate))~with~Index~Price~bolditalic("9210.08")~"€")); plot(1,1, type="l", main = title) 所以不可能动态更改ST 的值（就像在for 循环中一样）？