Import Và Export Dữ Liệu Từ Excel Vào R

Excel to R

Để import file Excel vào R, chúng ta có thể sử dụng package readxl.

library(readxl) library(dplyr)

Giả sử, chúng ta đang có 1 file Excel datasets.xlsx có sẵn trong thư mục package readxl trong đường dẫn sau:

path <- readxl_example("datasets.xlsx") path ## [1] "E:/Rlibrary/readxl/extdata/datasets.xlsx"

File Excel datasets.xlsx có 4 sheets: iris, mtcars, chickwts, quakes.

Bây giờ để import dữ liệu iris (sheet đầu tiên trong file Excel này) vào R, chúng ta sẽ sử dụng hàm read_excel() với câu lệnh như sau:

iris <- read_excel(path, # đường dẫn sheet = 1 # số thứ tự sheet ) iris %>% as.data.frame %>% head ## Sepal.Length Sepal.Width Petal.Length Petal.Width Species ## 1 5.1 3.5 1.4 0.2 setosa ## 2 4.9 3.0 1.4 0.2 setosa ## 3 4.7 3.2 1.3 0.2 setosa ## 4 4.6 3.1 1.5 0.2 setosa ## 5 5.0 3.6 1.4 0.2 setosa ## 6 5.4 3.9 1.7 0.4 setosa

Tương tự như vậy, nếu chúng ta muốn import dữ liệu mtcars (sheet thứ 2 trong file Excel) vào R, chúng ta chỉ cần chọn option sheet = 2.

mtcars <- read_excel(path, # đường dẫn sheet = 2 # số thứ tự sheet ) mtcars %>% as.data.frame %>% head ## mpg cyl disp hp drat wt qsec vs am gear carb ## 1 21.0 6 160 110 3.90 2.620 16.46 0 1 4 4 ## 2 21.0 6 160 110 3.90 2.875 17.02 0 1 4 4 ## 3 22.8 4 108 93 3.85 2.320 18.61 1 1 4 1 ## 4 21.4 6 258 110 3.08 3.215 19.44 1 0 3 1 ## 5 18.7 8 360 175 3.15 3.440 17.02 0 0 3 2 ## 6 18.1 6 225 105 2.76 3.460 20.22 1 0 3 1

Như vậy, để import dữ liệu của tất cả các sheet trong file Excel vào R, chúng ta có thể import từng sheet trong file Excel đó vào R bằng việc sử dụng câu lệnh ở trên. Tuy nhiên, việc làm “manual” đó chỉ thích hợp với trường hợp file Excel chỉ gồm 1 vài sheet, còn đối với những trường hợp file Excel bao gồm cả hàng chục hoặc hàng trăm sheet thì chúng ta cần một giải pháp khác thông minh hơn để xử lý vấn đề trên.

Để giải quyết vấn đề trên, chúng ta có thể dùng cách sau:

library(openxlsx) # package cần dùng wb_obj <- loadWorkbook(path) # thống kê những sheets có trong file excel sheet_names <- sheets(wb_obj) # tên của các sheets for (i in 1:length(sheet_names)) { # Đối với lần lượt từng sheet trong file excel, câu lệnh sẽ import thành 1 data frame trong R với tên tương ứng theo từng sheet assign(sheet_names[i], readWorkbook(wb_obj, sheet = i)) }

Kết quả: Tất cả các sheet trong file Excel sẽ được import vào R thành các data frame tương ứng (trong Global Environment).