※ 引述《celestialgod (攸藍)》之銘言:
: ※ 引述《helixc (@_2;)》之銘言:
: # readxl套件: (不用JAVA,讀取也比較快,也不會轉換字串為factor)
: library(readxl)
: dat = read_excel("birdnames.xls")
這邊報告一下... readxl這個套件沒問題,
但用dplyr處裡資料的時候就會有問題。
[code]
library(readxl)
library(dplyr)
fileName = "birdnames.xls"
#讀取資料
x = read_excel(fileName)
#資料讀取輸出正常
x$c_name[51:52]
#使用dplyr::select來讀資料,用兩種不同的寫法,一樣都不正常
y1<-select(x, c_name, Order) ; y1[51:52,]
y2<- x %>% select(c_name, Order) ; y2[51:52,]
#使用base::unique來讀取資料,正常
z<-unique(x$c_name); z[51:52]
還不太會貼code以及處裡過程,直接貼圖
http://imgur.com/7oOVkLm
不正常的資料
Source: local data frame [2 x 2]
c_name Order
1 白嘴潛鳥 51
2 小<U+9E0A><U+9DC9> 52
正常的資料
[1] "白嘴潛鳥" "小鸊鷉"
如果是package處裡的問題的話,那轉移到非windows系統是無解的吧?
只能捨棄dplyr使用*apply來輸出名錄了...
可是我還不會用*apply來寫dplyr-like的功能阿Orz