2.4数据输入

2.4.1读取文本文件

thuesen2<-read.table("D:\\study\\作业\\rdata.txt",header = T)#读取D盘下学习下rdata.txt文件，（header=T）第一行为标头，并将其赋给thuesen2数据框
thuesen2

blood.glucose short.velocity
1 15.3 1.76
2 10.8 1.34
3 8.1 1.27
4 9.3 1.31
5 8.6 NA
6 10.3 1.12
7 9.5 1.70

secretin2<-read.table("D:/Kilimanjaro/software/R/R-3.4.3/library/ISwR/rawdata/secretin.txt")#读取路径下的txt文件，并将其赋给secretin2
secretin2

gluc person time repl time20plus time.comb
1 92 A pre a pre pre
2 93 A pre b pre pre
3 84 A 20 a 20+ 20
4 88 A 20 b 20+ 20
5 88 A 30 a 20+ 30+
6 90 A 30 b 20+ 30+
7 86 A 60 a 20+ 30+
8 89 A 60 b 20+ 30+
9 87 A 90 a 20+ 30+
10 90 A 90 b 20+ 30+
11 85 B pre a pre pre
12 85 B pre b pre pre
13 74 B 20 a 20+ 20

levels(secretin2$time)#查看水平因子的名称

[1] “20” “30” “60” “90” “pre”

system.file("rawdata","thuesen.txt",package = "ISwR")#寻找文件secretin.txt的路径

[1] “C:/Users/Kilimanjaro/Documents/R/win-library/3.5/ISwR/rawdata/thuesen.txt”

2.4.2read.table的进一步讨论

2.4.3数据编辑器

aq<-edit(airquality)#打开数据编辑器，关掉时，编辑过的数据将被分配到aq，原数据保持不变
aq

Ozone Solar.R Wind Temp Month Day

1 41 190 7.4 67 5 1
2 36 118 8.0 72 5 2
3 12 149 12.6 74 5 3
4 18 313 11.5 62 5 4
5 NA NA 14.3 56 5 5
6 28 NA 14.9 66 5 6
7 23 299 8.6 65 5 7
8 19 99 13.8 59 5 8
9 8 19 20.1 61 5 9
10 NA 194 8.6 69 5 10
11 7 NA 6.9 74 5 11
12 16 256 9.7 69 5 12
13 11 290 9.2 66 5 13
14 14 274 10.9 68 5 14
15 18 65 13.2 58 5 15

fix(aq)#不介意覆盖原来的数据框，可以使用fix（),等价于aq<-edit(aq)
dd<-data.frame()#创建一个空白数据框
fix(dd)#输入数据到空白数据框dd，另一种方法可以是dd<-edit(data.frame())

2.4.4其他程序的接口

后期将会写一篇，其他程序的数据读入方式，请关注小白。

read.table("clipboard",header = T)#从系统的剪切板中读取数据

blood.glucose short.velocity
1 15.3 1.76
2 10.8 1.34
3 8.1 1.27
4 9.3 1.31
5 8.6 NA
6 10.3 1.12
7 9.5 1.70