No.4 R读写操作

一、导入文本、csv、xls、txt

1.导入CSV

安装readr包

library(readr)
data<-read_csv("D:/R_proj/test1029/test_data/test2.csv")
data

 2.导入xls

安装readxl包

library(readxl)
data<-read_excel("D:/R_proj/test1029/test_data/门店B.xlsx")
data

3.导入txt

data<-read_excel("D:/R_proj/test1029/test_data/门店B.xlsx")

4.手动输入数据

data1<-data.frame(Id=numeric(),name=character(),gender=character(),stringsAsFactors = F)
data1<-edit(data1)

5.R语言内置的数据包

data()

• 查看ggplot2中可用的数据

data(package="ggplot2")

library(ggplot2)
diamonds

data2=head(diamonds,5)
data2
x<-data2[,4]
x
y<-data2[,8]
y

• 　　一些函数查看数据的属性：

str(diamonds)   #查看数据结构
names(diamonds)  #查看列名字
nrow(diamonds)   #查看行数
ncol(diamonds)   #查看列数
dim(diamonds)   #查看维度
length(diamonds)   #查看长度（行）
attributes(diamonds)   #查看属性
class(attributes(diamonds))   
summary（diamonds）   #查看统计信息，最大最小值等

二、写入文件

1.将数据写入到csv

write.csv(diamonds,"D:/R_proj/test1029/test_data/diamonds.csv")
#不要行名
write.csv(diamonds,"D:/R_proj/test1029/test_data/diamonds.csv",row.names = F) 

2.将数据写入到txt

write.csv(diamonds,"D:/R_proj/test1029/test_data/diamonds.txt",row.names = F) 

3.将处理结果写入txt

sink("D:/R_proj/test1029/test_data/summaryinfo.txt")
summary(diamonds)
sink()