r - 用“替代”输入的变量的标题中的粗体字

Question

那应该很容易......如何i在下图中的标题中以粗体显示 (=1) （仅调整参数main）？

i <- 1
plot(0~0, main=substitute(bold("foo"~i.~"bar"), list(i.=i)))

Answer 1

这个怎么样？

i <- 1
plot(0~0, main=substitute(bold("foo"~i.~"bar"), list(i.=as.character(i))))