1.向量

> rm(list = ls())
> x<-c(1,2,3)
> x
[1] 1 2 3
> x<-1:10
> x
 [1]  1  2  3  4  5  6  7  8  9 10
> x<-seq(1,10,by=0.5)
> x
 [1]  1.0  1.5  2.0  2.5  3.0  3.5  4.0  4.5  5.0  5.5
[11]  6.0  6.5  7.0  7.5  8.0  8.5  9.0  9.5 10.0
> x<-rep(1:3,2)
> x
[1] 1 2 3 1 2 3

2.从向量中提取元素

根据元素位置

> x
[1] 1 2 3 1 2 3
> x[4]
[1] 1
> x[-4]
[1] 1 2 3 2 3
> x[2:4]
[1] 2 3 1
> x[-(2:4)]
[1] 1 2 3
> x[c(1,5)]
[1] 1 2

根据元素的值

> x
[1] 1 2 3 1 2 3
> x[x==10]
integer(0)
> x[x<0]
integer(0)
> x[x %in% c(1,2,5)]
[1] 1 2 1 2

3.读取文本

> #读取本地数据
> read.table(file = "doudou.txt",sep = "\t",header = T)
  X1.X2
1   A,1
2    B,
3    C,
4   D,3
5    E,
> read.table(file = "huahua.txt",sep = "\t",header = T)
  X1 X2
1  A  1
2  B NA
3  C NA
4  D  3
5  E NA

4.设置行名和列名

> X<-read.csv("doudou.txt")
> colnames(X)
[1] "X1" "X2"
> rownames(X)
[1] "1" "2" "3" "4" "5"
> colnames(X)[1]
[1] "X1"
> View(X)
> colnames(X)[1]<-"bioplanet"
> View(X)
> X
  bioplanet X2
1         A  1
2         B NA
3         C NA
4         D  3
5         E NA
#4.设置行名和列名

5.数据框的导出

write.table(X,file = "yu.txt",sep = ",",quote = F)

6. #变量的保存与重新加载

> save.image(file = "bioinfoplanet.RData")
> save(X,file = "test.RData")
> load("test.RData")

7.提取元素

- X[x,y]#第x行第y列
- X[x,]#第x行
- X[,y]#第y列
- X[y] #也是第y列
- X[a:b]#第a列到第b列
- X[c(a,b)]#第a列和第b列
- X$列名#也可以提取列

Tips

将数据框名添加到搜索环境中：
attach（a）,作图时就只需输入列名(连$都不用了)

> a <-data.frame(case=paste("S",1:50),values=runif(50))
> plot(a$case,a$values)

plot

> attach(a)
> plot(case,values)

plot

总结

学习小组-Day5-Mingwei Guo R基础.png

题目：

save(X,file="test.RData")这句代码如果报错X not found，是为什么，应该怎么解决？

答案：
报错X not found可能性：

1. 不存在X这个向量
2. 向量x和X大小写写错（R中区分大小写）等

解决方法：
检查大小写，重新运行。必要时搜索网络经验。