向R中导入数据

library(RODBC)

 myconn<-odbcConnect("v5",uid="sa",pwd="123456")
data<-sqlQuery(myconn,"select * from [****] where ****")
close(myconn);

1.通过odbc数据源导入ms sql数据,这需要提前设置odbc数据源,具体参考博客点击打开链接

2.csv文件通过read.csv()函数,另外读取excel文件也可先另存为csv文件再进行导入

3.从Internet导入数据集

str(read.csv('http://opengeocode.org/download/CCurls.txt'))

上面的例子从AOG数据库获取一个以逗号分隔的文件,AOG网站提供了政府和国家机构的统计信息、人口信息、以及全国各邮政机构的网址信息

4.JSON格式

Socarata ASPI是一个金融相关的API,可以通过访问URL:https://mp.csdn.net/postedit,获得后台的数据库的信息,

library(rjson)                          #导入刚刚下载的rjson包

 u<-"http://data.consumerfinance.gov/api/views"     # 将url赋值给u

res<-fromJSON(file=paste0(u,'/s6ew-h6mp/rows.json?max_rows=5'))   #将前5行中ID为s6ew-h6mp的数据内容保存到res中

names(res)                                 # 查看变量名字

res<-res$data                            #删掉其他元素,仅仅保存data行

class(res)                                  #查看res的数据类型

df<-as.data.frame(t(sapply(res,function(x) unlist(x[-13]))))

str(df)      #应用一个简单的函数去掉了表中每个元素的地址信息(移除了每个x的第13个元素)然后自动                                  

                 #将其简化为matrix,再将结果转化为data.frame

5.使用R包与API交互

5.1 SCorata的开源API

 install.packages("RSocrata")

library(RSocrata)

df<-read.spcrata(paste0(u,'/s6ew-h6mp'))














评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值