为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"和"日期".

有没有办法得到我想要的结果？谢谢!

Answer 1

从数学注释的帮助页面调整其中一个示例(请参阅示例'如何组合'数学"和数字变量"):

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