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

我有一个长字符串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”.

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

最佳答案
调整mathematical annotation帮助页面中的一个示例(请参见示例’如何组合’数学“和数字变量”):

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

转载注明原文:为R中的字符串片段设置不同的字体 - 代码日志