用R讀取各種文件的方法

把博客文章里的內容都搬到隨筆這里來啦~~~~~~~~~~~~~·用R讀取各類文件其實很簡單，只是有時候要注意一下加載library的順序，不過沒事，一般系統都會提醒你噠！

---------------------------------

#讀取txt文件
bank1 <- read.table('user_info.txt',
header = F,
sep = ',',
na.strings = 'null',
encoding = 'utf8')
head(bank1)

 

#讀取csv文件
bank2 <- read.csv('SegData.csv',
header = F,
sep = ',',
na.strings = 'null',
encoding = 'utf8')
head(bank2)

 

#讀取excel文件
install.packages('xlsx')
library(xlsxjars)
library(rJava)
library(xlsx)
bank3 <- read.xlsx('SegData.xlsx',
sheetName = 'SegData2',
header = F)
head(bank3)

 

#讀取XML文件
install.packages('XML')
install.packages('methods')
install.packages('RMySQL')
library(XML)
library(methods)
bank4 <- xmlTreeParse(file = 'input.xml')
head(bank4)
xmlToDataFrame('input.xml')

 

#讀取json文件
install.packages('rJson')
library(rjson)
bank5 <- fromJSON(file='input.json')
head(bank5)
json_data_frame <- as.data.frame(bank5)
head(json_data_frame)

 

#SegData中提取收入5W~10W，擁有房產的用戶。

library(xlsxjars)
library(rJava)
library(xlsx)
mydata <- read.xlsx('SegData.xlsx',1)
head(mydata)
mydata[mydata$house=="Yes"&mydata$income>=50000&mydata$income<100000,]