3

複数の JPEG ファイルを含むフォルダーがあります。RでこれらのJPEGからPDFファイルを生成するにはどうすればよいですか?

1 JPEG = 1 PDF ページ。画像は同じサイズです。

よろしくお願いします。

4

3 に答える 3

1

これは、Latex を使用して簡単に行うことができます。これは素晴らしいことです。Sweave を使用してすべてを実行できるからです。

次の行に沿って何かを行うことができます：

% This is some Sweave file
\documentclass{article}
\usepackage{graphicx}
\begin{document}

<<results=tex,echo=FALSE>>=
mypics <- dir('mypics')
for(i in mypics){
cat("\\includegraphics{", i, "}\n\n", sep = "")
}
@
\end{document}

OK、Sweave パイプラインをセットアップする必要がありますが、少し調整するだけで、プロセス全体を簡単に自動化できます。

于 2013-01-30T11:07:37.067 に答える
1

R の使用を主張する場合 (他のツールの方が適切です)、次のようなことを試してください (遅い、テストされていません):

   lf = list.files(pattern = "jpeg") # image filenames

   library(jpeg)
   jpegs = lapply(lf, readJPG)

   library(grid)
   pdf("output.pdf", width=8, height=4)
   grid.raster(jpegs[[1]])
   lapply(jpegs[-1], function(x) {grid.newpage() ; grid.raster(x)} ) -> bquiet
   dev.off()
于 2013-01-30T18:28:43.060 に答える
0

これを行うためにRを使用することを主張する場合は、pdfプロッティングデバイスを開いparて余白を設定できます（デフォルトはおそらく大きく、中央に配置されません）。次に、ループplot.newで新しいページを開始plot.windowして座標を設定します。軸などをプロットせずにread.jpeg、ReadImagesパッケージ（または他のツール/パッケージを読んで、EBImageは別の可能性）の関数を使用してからrasterImage、jpegをpdfデバイスにプロットします（またはそれらのステップの一部を他の画像プロット関数に置き換えます） 、ReadImages の plot メソッドなど)。

しかし、全体としては、この種のこと用に設計されたツールを使用する方がおそらく簡単/迅速/より良い/...です。プログラムの ImageMagick スイートが思い浮かびます。LaTeX についても言及されており、おそらく他のツールもあるでしょう。

于 2013-01-30T17:11:45.870 に答える