R：使用UTF-8字体将.eps导出到Word

Question

我无法将立陶宛字体（UTF-8）的图像从R导出到MS Word。到目前为止，通过研究方法，我发现的是以下示例：

postscript("foo.eps", horizontal = FALSE, onefile = FALSE, 
            paper = "special", height = 7, width = 7,
            colormodel = 'rgb')
plot(density(rnorm(100)), main = "ąčęėįšųūž")
dev.off()

图像成功导入单词，但是我遇到了字体问题。在R里面它看起来不错，但最终输出 看起来像这样：。似乎字体有问题。我尝试使用以下代码嵌入它们：

library(extrafont)
## Only for the first run: Made sure the ghostScript was reachable:
Sys.setenv(R_GSCMD = "C:/Program Files (x86)/gs/gs9.19/bin/gswin32c.exe")

embed_fonts('foo.eps', outfile='foof.eps')

但是，最终结果是.eps文件，它没有导入带有消息＆＃34的MS Word;此图像当前无法显示＆＃34;。

我做错了什么？任何帮助将不胜感激！

注意：图像的格式不一定是EPS格式，但我没有找到Word所能理解的任何其他格式，其质量也接近PDF（JPEG / PNG质量）太低了）。

编辑：将两个.eps文件包含在一个LaTeX文件中会产生两个正确的图像，因此问题可能在于Word解释并加载文件的方式..任何想法在哪里？