R语言之导入数据源（一）

R中可导入各种数据源的数据，包括键盘、文本文件、excel和access、流行的统计软件、特殊格式的文件，以及多种关系型数据库中导入数据。

1 使用键盘输入数据

R中的函数edit()会自动调用一个允许手动输入数据的文本编辑器。具体步骤如下：

（1）创建一个空数据框（或矩阵），其中变量名和变量的模式需与理想中的最终数据集一致；

（2）针对这个数据对象调用文本编辑器，输入你的数据，并将结果保存回此对象中。

> mydata<-data.frame(age=numeric(0),gender=character(0),weight=numeric(0))> mydata<-edit(mydata)

<img src="http://img.blog.csdn.net/20160323093621509?watermark/2/text/aHR0cDovL2Jsb2cuY3Nkbi5uZXQv/font/5a6L5L2T/fontsize/400/fill/I0JBQkFCMA==/dissolve/70/gravity/Center" alt="" />

2 从带分隔符的文本文件导入数据

使用read.table()从带分隔符的文本文件中导入数据。此函数可读入一个表格格式的文件并将其保存为一个数据框。

mydataframe<-read.table(file,header=logical_value,sep="delimiter",row.names="name"),其中file是一个带分隔符的ASCII文本文件，header是一个表明首行是否包含了变量名的逻辑值，sep用来指定分隔数据的分隔符，row.names是一个可选参数，用以指定一个或多个表示行标识符的变量。

> grades<-read.table("E:/SPSS案例数据/SPSS案例数据/Chapter5/data/products.csv",header=TRUE,sep=",",row.names="客户ID")

3 导入Excel数据（两种方法）

（1）在excel中将其导出为一个逗号分隔文件（csv），并使用上述方法导入R中；

（2）使用RODBC包来访问excel（.xls）文件。

> library(RODBC)> channel<-odbcConnectExcel("文件名")   #若文件不在此工作区间，加上文件路径，该函数只能用于32-bit windows> mydataframe<-sqlFetch(channel,"工作表名称")> odbcClose(channel)

（3）xlsx包可以用来读取(.xlsx)格式的电子表格。包中的函数read.xlsx()可将xlsx文件中的工作表导入为一个数据 框。read.xlsx(file,n)，其中file是Excel2007工作簿所在路径，n则为要导入的工作表序号。

> library(xlsx)> workbook<-"工作簿路径"> mydataframe<-read.xlsx(workbook,1)