R语言数据的输入

键盘输入

调用edit函数，比如我们要让用户输入一个长度为5的向量并赋值给变量a，那么可以：

     a<-vector( 
    " 
    integer 
    ", 
    5) 
    
a<-edit(a) 
   

另外也可以用函数fix来直接编辑变量，而不需要再赋值变量。所以上面编辑a变量的命令可以改为：

     a<-vector( 
    " 
    integer 
    ", 
    5) 
    
fix(a) 
   

读取文本文件

read.table函数可以读取csv文件，也可以读取其他分隔符分割的文本文件。如果是Tab键分割，那么就是“\t”比如：

y<-read.table( " hw1_data.txt ",header=TRUE,sep=“\t”)

如果是标准的CSV文件，那么可以使用read.table还可以使用read.csv函数读取：

x<-read.csv( " hw1_data.csv ")

 

读取Excel格式的文件

Excel格式分为老的xls和新的xlsx两种，其实读取方法是一样的，一般现在使用的都是xlsx格式的Excel文件了，要读取这种格式的文件，需要安装package: xlsx。

     library(xlsx) 
    
excelFile<- 
    " 
    test1.xlsx 
    " 
    
excel<-read.xlsx(excelFile, 
    1) 
   

最后那个参数1表示读取第一个Sheet，如果要读取第二个Sheet就将该参数改为2.

 

读取Url

如果我们想直接读取一个Url文件，那么可以使用url函数建立一个connection，然后使用readLines函数得到该Url的内容。

比如：

    b<-url( 
   " 
   http://www.baidu.com 
   ") 
   
html<-readLines(b) 
  

这些需要说明的是，除了HTTP协议，还可以使用ftp协议file://共享文件夹。另外还可以设置访问网络的代理。

 

读取数据库

如果需要在R中连接数据库，主要是使用ODBC来连接，需要安装包RODBC。如果是Linux或者Mac平台，对于MySQL数据库，可以安装RMySQL包。

因为我现在是Mac，就以MySQL为例，我在MySQL的test数据库中建立了一个表Employee，现在需要读取该表。

    library(RMySQL) 
   
conn<-dbConnect(MySQL(),dbname= 
   " 
   test 
   ",host= 
   " 
   127.0.0.1 
   ") 
  

接下来我们要查看有哪些表，可以：

dbListTables(conn)

如果我要查询Employee表中的所有数据，那么：

emp<-dbGetQuery(conn, " select * from Employee”)

查询完了数据库记得关闭连接，这是一个好习惯：

dbDisconnect(conn)

如果我们连接的不是MySQL，那么就需要安装对应的数据库连接的包。比如：

• ROracle
• RPostgreSQL
• RSQLite

另外也可以用JDBC来访问数据库，包是RJDBC