Postscript无法从R Script

时间:2019-02-20 03:39:53

标签: r macos fonts

我希望将一些文本转换为Postscript。使用herehere中的以下方法可用于某些字体,但不是全部。我很困惑为什么会这样。

它适用于Times,使用Postscript名称TimesNewRomanPSMT。 不适用于Snell Roundhand,Postscript名称SnellRoundhand。

都是.ttf字体。 两者都位于我的iMac上的/ Library / Fonts中。

在找不到字体并且默认为Helvetica的位置上是否存在Postscript错误消息?如果是这样,在哪里?

R中是否有更好的方法可以从文本创建Postscript文件?

library(grImport)

# Must use Postscript name of file. See Font Body app in MacOS
cat("%!PS 
     /SnellRoundhand findfont 
     100 scalefont 
     setfont 
     newpath 
     0 0 moveto 
     (yfde) show", file = "data/y.ps")

PostScriptTrace("data/y.ps", "data/y.xml")
letters <- readPicture("data/y.xml")
grid.picture(letters)

1 个答案:

答案 0 :(得分:0)

Unix_SO建议的脚本对我有用。

# Write text file
letter <- "a"
letter_txt <- paste0("q", ".txt")
write_file(letter, path = letter_txt, append = FALSE )

# Convert text to Postscript with enscript
font_size <- "SnellRoundhand10"
unix_cmd <- paste0("enscript -B -o ", letter, ".ps -f ", font_size, " ", letter_txt)
system(unix_cmd)