R：“ plotmath”在使用Computer Modern字体时产生额外的空白

Question

更具体地说，“并列”功能[即当使用“ CM Roman”字体家族时，“ *”或“ paste”]会产生额外的空格。与其他家庭[例如“ CenturySch”]正常工作。 R问题（使用3.0.2）？还是无效的字体源文件？

MWE [请注意第一个“罪”之后的空白）：

library(extrafont)
postscript(file="example.eps",heigh=5,width=5,fonts=c("CM Roman","CenturySch"))
plot(2,type="n")
text(1,2,  expression( "sin"*(e^{-italic(t)} )),family="CM Roman",  cex=2 )
text(1,1.5,expression( "sin"*(e^{-italic(t)} )),family="CenturySch",cex=2 )
dev.off()

第一个“罪”之后的空白：

谢谢您的回复。

M。