wolfram-mathematica - Mathematica で .eps ファイルを .pdf に変換するにはどうすればよいですか?

Question

Mathematica内で .eps を .pdf に変換するにはどうすればよいですか (おそらく GhostScript を使用しますか?)。

Answer 1

GhostScriptをインストールし、適切な環境変数を設定した後 (Windows の場合は、最上位の Ghostscript ディレクトリである にとを追加する必要があります)、 Jens Nöckel の方法を使用して .eps を .pdf に変換できます (すべてのグリフがアウトライン化されます)。gs\bings\libPATHgs

gsEPS2PDF[epsPath_String, pdfPath_String] := 
 Run["gswin64c.exe -sDEVICE=pdfwrite -dNOCACHE -sOutputFile=\"" <> 
   pdfPath <> "\" -q -dbatch -dNOPAUSE \"" <> epsPath <> "\" -c quit"]

これは、64 ビット Windows システム用のGhostScriptgswin64c.exe実行可能ファイルの名前です。Linux の場合は、gs.

Kurt Pfeifle のコードに基づく別の方法 (フォントのアウトラインなし):

gsEPS2PDFEmbedFonts[epsPath_String, pdfOutputPath_String] := 
 Run["gswin64c.exe -sFONTPATH=c:/windows/fonts -o \"" <> 
   pdfOutputPath <> 
   "\" -sDEVICE=pdfwrite -dPDFSETTINGS=/prepress \"" <> epsPath <> 
   "\""]

c:/windows/fontsフォントが配置されているディレクトリは次のとおりです。GhostScript コマンド ライン パラメータについては、こちらも参照してください。

Answer 2

gr = Import["file.eps", "eps"]
Export["file.pdf", gr, "pdf"]