r - 为 R 中的字符串片段设置不同的字体

Question

我有一个很长的字符串 txt我想使用 mtext() 在绘图中显示为边距文本. txt字符串由另一个字符串 txt.sub 组成，以及日期字符串，它将特定格式应用于日期命令参数。但是，我只想以粗体显示该字符串的“日期”部分。

字符串是:

 date.in = as.Date( commandArgs( trailingOnly=TRUE )[1], format="%m/%d/%Y" )
 date = format(date.in, "%b %d, %Y")
 txt.sub = "Today's date is: "
 txt = paste(txt.sub, date, sep = "") 

我尝试了以下

 ## Plot is called first here.
 mtext(expression(paste(txt.sub, bold(date), sep = "")), line = 0, adj = 0, cex = 0.8)

但问题在于它没有粘贴 txt.sub 的值和 date ，而是按字面显示“txt.sub”和“date”。

有什么办法可以得到我正在寻找的结果吗？谢谢!

Answer 1

调整 mathematical annotation 上的帮助页面中的示例之一(参见示例“如何组合“数学”和数字变量):

mtext(bquote(.(txt.sub) ~ bold(.(date))), line=0, adj=0, cex=0.8)