RでExcelスプレッドシートを.csvとして保存しますか？

Question

複数のワークシートを含む大規模なExcelスプレッドシートをRの.CSVファイルに変換する最も簡単な方法は何ですか？

私はXLConnectとXLSXをテストしたところ、Excelシートがクラッシュすることがわかりました。だから私は特にXLConnectやXLSXパッケージを使わないソリューションを探しています。

Answer 1

http://rwiki.sciviews.org/doku.php?id=tips:data-io:ms_windows

EDIT：read.xlsxオプションに対処する：

あなたが実行しているPerlを持っている場合は、GDATAの現在のバージョンを必要とする

require(gdata) 
installXLSXsupport() #now the example from help(read.xls) 
    # load the third worksheet, skipping the first two non-data lines... 
    if('XLSX' %in% xlsFormats()) # if XLSX is supported.. 
     data <- read.xls(exampleFile2007, sheet="Sheet with initial text", skip=2) 
data 
#----------------------- 
    X  X.1 D E. F G Factor 
1 NA FirstRow 1 NA NA NA Red 
2 NA SecondRow 2 1 NA NA Green 
3 NA ThirdRow 3 2 1 NA Red 
4 NA FourthRow 4 3 2 1 Black 
#------------------------ 
write.csv(data) 

これは、Mac上で行われたと私はいつもエラーが発生して以来、私はいつもinstallXLSXsupport（）ステージで遭遇しました。今回私はTerminalコマンドラインからPerlを起動し、私の個人設定を最初に設定し、大陸でCPANミラーを定義した後に成功を収めました。私はperlを実行していました。

Answer 2

は、ここですべてのシートを書き出すためにループです：readxlパッケージに基づいて

require(gdata) 
## install support for xlsx files 
installXLSXsupport() 
excelFile <- ("/full/path/to/excelFile.xlsx") 
## note that the perl scripts that gdata uses do not cope well will tilde expansion 
## on *nix machines. So use the full path. 
numSheets <- sheetCount(excelFile, verbose=TRUE) 

for (i in 1:numSheets) { 
    mySheet <- read.xls(excelFile, sheet=i) 
    write.csv(mySheet, file=paste(i, "csv", sep="."), row.names=FALSE) 
} 

Answer 3

更新の答え。

library("readxl") 

#function to read all sheets of a workbook 
read_excel_allsheets <- function(filename) { 
    sheets <- readxl::excel_sheets(filename) 
    x <- lapply(sheets, function(X) readxl::read_excel(filename, sheet = X)) 
    names(x) <- sheets 
    x 
} 

sheetnames <- read_excel_allsheets("excelFile.xlsx") 
names(sheetnames)