R数据分析-读取多格式文件数据源

1. R读取数据源
   
2. R读取键盘录入数据(通常用于数据量较少的数据源)，实例如下:

mydata <- data.frame(age=numeric(0),gender=character(0),weigh=numeric(0)); #定义数据框属性类型
mydata <- edit(mydata); # 打开数据编辑框

3.R读取带分隔符的文件
实例:

install.packages(‘foreign’);
library(foreign);
mycsvData <- read.table(‘C:/Users/kuson/Desktop/R_DATA/RData/input.csv’,header=TRUE,sep=’,’);
mycsvData;

4. R读取excel文件
   实例:

install.packages(‘xlsx’); #下载并安装xlsx包,根据镜像安装
library(xlsx); # 引入xlsx包
myExcelData <- read.xlsx(‘C:/Users/kuson/Desktop/R_DATA/RData/rdata.xlsx’,1); #参数为文件路径与第几个单元簿
myExcelData；

5. 读取数据库数据
   实例:

install.packages(“RMySQL”, repos = “https://mirrors.ustc.edu.cn/CRAN/”);
any(grepl(“RMySQL”,installed.packages()))
[1] TRUE
library(RMySQL);
library(DBI);
mysqlconnection = dbConnect(MySQL(), user = ‘root’, password = ‘kuson’, dbname = ‘tensquare_base’,host = ‘localhost’); #创建连接对象
dbSendQuery(mysqlconnection, ‘SET NAMES GBK’); #解决中文乱码
dbListTables(mysqlconnection) #查看数据表信息
[1] “tb_city” “tb_label” “tb_ul”
result <- dbSendQuery(mysqlconnection, “select * from tb_city”);
#执行查询
mysqldata <- fetch(result, n = 2); #获取固定条数数据
mysqldata
id name ishot
1 1 北京 1
2 2 上海 1