Rからエクセルに色々と書き込む
Rで分析した結果をエクセル方眼紙に叩きこまなければいけない状況、あると思います。
XLConnectパッケージを使うとその辺が簡単にできるのでぜひお試しあれ。
以下はデータと画像をそれぞれ別のシートに書きこむコード。
他にもセルの書式を指定したり、関数を書きこんだり色々できるのでみんな使うといい。
library(ggplot2) library(XLConnect) #書き込むための画像を準備 qplot(data=iris, x=Sepal.Length, y=Sepal.Width, geom="point") ggsave(file="sample.png") # ブックを開いてデータを書きこむシートを作る # 新規の場合はcreate=TRUEを指定 wb <- loadWorkbook("sample.xls", create = TRUE) createSheet(wb, name="sample") # シートに書き込めるオブジェクトは原則としてデータフレーム # テキストを書きこみたい時はデータフレームにして、header=FALSEを指定 writeWorksheet(object = wb, data = data.frame(x="これはサンプルです"), sheet = "sample", startRow = 2, startCol = 2, header=FALSE) writeWorksheet(object = wb, data = iris, sheet = "sample", startRow = 4, startCol = 2) # 新規シート(sampleImageという名前)を追加して画像を書きこむ # 画像を書きこむ場合は、Nameregionを指定する必要がある createSheet(wb, name="sampleImage") createName(wb, name = "sampleImage", formula = "sampleImage!$B$2") addImage(object = wb, filename = "sample.png", name = "sampleImage", originalSize=TRUE) #ブックを閉じる saveWorkbook(wb)