R下赋值、提取元素、数据框练习
赋值
> x<-c(3,4,5)
> x
[1] 3 4 5
> x<- 2:8
> x
[1] 2 3 4 5 6 7 8
> x<-seq(5,6,by=0.1)
> x
[1] 5.0 5.1 5.2 5.3 5.4 5.5 5.6 5.7 5.8 5.9 6.0
> x<-rep(5:6,times=3)
> x
[1] 5 6 5 6 5 6
赋值时c（。。。）是向量，a:b是从a到b的整数，seq(a,b,by=c)从a到b每隔c取一个数，rep(a:b,times+c)从a-b的整数重复c次
提取元素
> x
[1] 5 6 5 6 5 6
> x[2]
[1] 6
> x[2:4]
[1] 6 5 6
> x[-2]
[1] 5 5 6 5 6
> x[-(2:4)]
[1] 5 5 6
> x[c(1,3)]
[1] 5 5
> x[x=5]
[1] 5
> x[x<6]
[1] 5 5 5
> x[x%in%c(5,5,6)]
[1] 5 6 5 6 5 6
数据框
在文件-显示文件内容中查看所处目录，在当前目录下新建一个文本文档liu.txt
image.png
> x<-read.csv('liu.txt')
> x
X1 X2
1 A 1
2 B NA
3 C NA
4 D 3
5 E NA
如图在R中显示出我的数据框放在当前目录下
sep 是函数的形式参数，多数情况下， seq 参数用来指定字符的分隔符号。不仅用在你所提到的输出，也用在输入，也用在字符串的合并与拆分上。csv 文件是用逗号分隔的，故而 sep = ","tsv 文件是用制表符分隔的，故而 sep = "\t"常用的分隔符还有空格 sep = " "分隔符是任意的，可根据具体情况指定的。在输入的时候，原内容是用什么符号分隔的，sep就要保持一致，否则可能无法正确读取。
作者：知乎用户
链接：https://www.zhihu.com/question/47264108/answer/106238567
来源：知乎
著作权归作者所有。商业转载请联系作者获得授权，非商业转载请注明出处。
读取本地数据
> x<-read.table(file="liu.txt",sep="\t",header=T)
> x
X1.X2
1 A,1
2 B,
3 C,
4 D,3
5 E,
> a<-read.table(file="liu.txt",sep="\t",header=T)
> a ##这里的a就赋值成了一个数据框
X1.X2
1 A,1
2 B,
3 C,
4 D,3
5 E,
导出数据框
参数说明：
x：需要导出的数据
file：导出的文件路径
sep：分隔符，默认为空格（” “），也就是以空格为分割列
row.names：是否导出行序号，默认为TRUE，也就是导出行序号
col.names：是否导出列名，默认为TRUE，也就是导出列名
quote：字符串是否使用引号表示，默认为TRUE，也就是使用引号表示
————————————————
版权声明：本文为CSDN博主「东华果汁哥」的原创文章，遵循CC 4.0 BY-SA版权协议，转载请附上原文出处链接及本声明。
原文链接：https://blog.csdn.net/u013421629/article/details/72771241
> write.table(x,file = "yu.txt",sep = ",",quote=F)--以逗号分隔数据列，含行号，含列名，字符串不带引号
> x
X1 X2
1 A 1
2 B NA
3 C NA
4 D 3
5 E NA
变量的保存和重新加载
save.image(file="bioinfoplanet.RData")#保存当前所有变量
save(X,file="test.RData")#保存其中一个变量
load("test.RData")#再次使用RData时的加载命令
save(X,file="test.RData")这句代码如果报错object X not found，是为什么，应该怎么解决？
把X换成x 或者是其他当前工作目录中已存在的变量就可以了。
