Rスクリプトを使用してExcelファイルにワークシートを追加できません

Question

各シートに3つのデータフレームを渡す必要がある複数のスプレッドシートでワークブックを作成しようとしています。しかし、私は、シートを作成する問題が次のエラーを持っている：

Error in .jcall(wb, "Lorg/apache/poi/ss/usermodel/Sheet;", "createSheet", : method createSheet with signature (D)Lorg/apache/poi/ss/usermodel/Sheet; not found

私はXLSXパッケージを使用していますし、関連するコードの一部は以下の通りです：

wb <- createWorkbook(type="xlsx") 
saveWorkbook(wb, 'output.xlsx') 

for (i in year) 
{ 
    sheet.1 <- createSheet(wb, sheetName = i) 
    data.filter <- realdata[realdata$year_ == i,] 
    data.filter <- data.filter[data.filter$month_ >= month[1],] 
    data.filter <- data.filter[data.filter$month_ <= month[4],] 
    ptable_data_usado <- cast(data.filter, mondat ~ BASE, value = "myidx") 
    correl_usado <- cor(ptable_data_usado) 
    addDataFrame(correl_usado, sheet = i, startRow = 0, startColumn = 0) 
    ptable_data_prx <- cast(data.filter, mondat ~ NearestBaseName, value = "myidx") 
    correl_prx <- cor(ptable_data_prx) 
    addDataFrame(correl_prx, sheet = i, startRow = 14, startColumn = 0) 

} 

Answer 1

することはできません再現可能な例はありませんが、問題は2行あります。sheet = iがあります。代わりに、sheet = sheet.1にする必要があります。また、startRowとstartColumnは、ゼロより大きい整数である必要がありますが、これは、見つからないエラーではなく、許容範囲外のエラーが発生します。

また、saveWorkbook(wb, 'output.xlsx')はループの後に来る必要があります。

Answer 2

同様の問題が発生しました。私の解決策は、シート名を文字に強制することでした。

だからあなたの場合には、それは

sheet.1 <- createSheet(wb, sheetName = as.character(i)) 

かもしれないが、それが役立つことを願っています。

Answer 3

xlsxパッケージは、機能のためにAPACHE POIプロジェクトからJAVAで書かれた関数を呼び出すためにrJavaを使用しています。 ワークシートをレコード生成する機能は以下のように宣言されます。

public XSSFSheet createSheet(java.lang.String sheetname) 

これは、関数に文字列を渡す必要があることを意味します。 Rに戻り、シート名は文字ベクトルでなければなりません。 @ Oleksii-Shの答えが正しいです。

それとも、使用することができます：あなたはそれをSheet1の名前を付けたい場合は

sheet.1 <- createSheet(wb, sheetName = paste0("sheet", i)) 

、Sheet2の...