我希望将一些文本转换为Postscript。使用here和here中的以下方法可用于某些字体,但不是全部。我很困惑为什么会这样。
它适用于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)
答案 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)