R語言讀取Excel的神器——openxlsx

做爲非程序猿的各位同志們，可能最擅長的數據整理軟件或者統計軟件就是——嗯，沒有錯，它就是集萬千寵愛於一身的EXO。

咳咳咳，好了。隆重推出咱們的主角——Excel

事實上，Excel是個super強大的軟件。基本上用它已經能完成大量的統計分析了。

For example

各種數理統計

線性規劃（LINGO表示欲哭無淚，你丫的搶我飯碗）。

固然，好久好久以前有這門本神書： 陳彥光. 基於Excel的地理數據分析[M]. 科學出版社, 2010.

固然，做爲新時代的研究生，咱們怎麼能僅用Excel來完成一切的科研任務呢？用老師的話說，大家用Excel作的圖，人家審稿都嫌low。這個時候R就登場了。 關於R的簡介我就不提了。歡迎各類度娘，扯了這麼久的淡。終於要進入正題了。 今天講的是R語言的第一步，讀數據——讀Excel的數據。 如下有三種方法: 1.將Excel轉存爲csv格式文件，讀csv文件。

a<-read.csv("exercise1.csv",header = T)

2.用RODBC包讀取Excel。

ab<-odbcConnectExcel2007("exercise1.xls")#鏈接excel，32位系統使用odbcConnectExcel函數
sqlTables(ab)

根據需求讀取對應的sheet1

a<-sqlFetch(ab,"Sheet1$")
odbcClose(ab)#關閉句柄，此句是必須。

3.用openxlsx包讀取Excel

a<-read.xlsx("exercise1.xlsx",sheet=1)#文件名+sheet的序號，簡單粗暴

綜合來看，openxlsx的方法簡單粗暴，並且經多名骨灰級玩家證實，罕有bug出現。乃R語言和Excel讀取的絕對神器。不過筆者也發現，openxlsx包僅適用於.xlsx格式文件。前期的xls格式文件可能還須要前兩種方法來讀取。除了以上三種方法，還有相似的包如xlsx、readxl。此處依舊強推神器openxlsx。首先，.xlsx文件存儲行數大大提高，從65536行數據提高到了104萬條數據。其次，它十分便捷，函數所需參數較少。固然最後的最後，它可能須要的R的版本比較的新。下一篇的預告：如何經過一行代碼升級R。 最後貼出全文的代碼。

#設置工做路徑
setwd("F:/R/applicationstatics")

#第一種方法：讀取csv
a<-read.csv("exercise1.csv",header = T)

#第二種方法：RODBC包
#安裝載入RODBC包，若是已安裝，請跳過第一句語句
install.packages(RODBC)
library(RODBC)

ab<-odbcConnectExcel2007("exercise1.xls")#鏈接excel，32位系統使用odbcConnectExcel函數
sqlTables(ab)
a<-sqlFetch(ab,"Sheet1$")
odbcClose(ab)#關閉句柄，此句是必須。

#第三種方法：openxlsx
install.packages(openxlsx)
library(openxlsx)
a<-read.xlsx("exercise1.xlsx",sheet=1)#文件名+sheet的序號，簡單粗暴

固然文末小福利：《基於Excel的地理數據分析》的電子版。須要的童鞋能夠評論並留下郵箱。