主要會讀到的是xlsx、xls以及csv檔。
xlsx、xls可以用read_excel來讀取，
結合excel_sheets與rbind則可抓出檔中所有sheet的資料。
也可使用readWorksheet來讀取（詳細在下方範例中）。
而讀取csv檔案滿常用read.csv以及read_csv，
比較大的檔就用fread來讀取會比較方便與快速。
下面有範例可參考。
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| ##1 | |
| library(readxl) | |
| test.xlsx <- read_excel('test.xlsx',1) ##1 is the position of the sheet, it can also enter the name of a sheet. | |
| test.xls <- read_excel('test.xls',1) | |
| ##2 | |
| excel_sheets("test.xlsx") ##Get sheets' name | |
| test.list <- lapply(excel_sheets("test.xlsx"), function(x) read_excel("test.xlsx",x)) ##Read all sheets in a xlsx file as a list. | |
| test.df <- do.call(rbind, test.list) | |
| ##3 | |
| library(XLConnect) | |
| wb <- loadWorkbook("test.xlsx") | |
| test.list <- readWorksheet(wb, sheet = getSheets(wb)) ##getSheets(wb): get sheets' name | |
| test.df <- do.call(rbind, test.list) | |
| ##4 | |
| test.csv <- read.csv('test.csv', stringsAsFactors=F) | |
| ##5 | |
| library(readr) | |
| test.csv <- read_csv('test.csv') | |
| ##6 | |
| library(data.table) | |
| test.fread <- fread('test.csv') ##For reading big csv file. |
沒有留言:
張貼留言