《学习小组Day5笔记--于多多》

向量：多个元素组成的变量

赋值

• x<-c(1,2,3) x赋值为1,2,3组成的变量
• x=1:10 x赋值成1-10之间的整数
• x<- seq(1,10,by = 0.5) 范围1:10，每隔0.5取一个数
• x<- rep(1:3,times=2) 数字1-3重复2次

从向量中提取元素

• x[2] 取向量中的第二个元素
• x[-2] 取除了第二个元素之外的元素
• x[1:3] 取第1-3个元素
• x[c(1,5)] 取第1和第五个元素
• x[x==10]#等于10的元素
• x[x<0]

• x[x %in% c(1,2,5)]#存在于向量c（1，2，5）中的元素

  
  
  于.png

数据框

读取数据

x=read.csv("文件名.csv/txt")
x=read.table(file="文件名.txt",sep="\t",header=T)以tab（制表符）为分隔符

设置行名列名

colnames(X) #查看列名
rownames(X) #查看行名
colnames(X)[1]<-"bioplanet"#有的公司返回数据，左上角第一格为空，R会自动补为x,用这个命令来修改
X<-read.csv(file = "文件名.txt",sep = " ",header =T,row.names=1)定义第一列为行名

导出数据框

write.csv(文件，“新文件名.csv",sep = ",",quote=F)分隔符改为逗号，字符串不加双引号

保存变量和重新加载

save.image(file="bioinfoplanet.RData")#保存当前所有变量
save(X,file="test.RData")#保存其中一个变量
load("test.RData")#再次使用RData时的加载命令

提取元素

• 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$列名#也可以提取列（优秀写法，而且这个命令还优秀到不用写括号的地步，并且支持Tab自动补全哦，不过只能提取一列）

任意提取两列作图

1. a <-data.frame(case=paste("S",1:50)),values=runif(50))
   plot(avalues) 提取某两列作散点图
2. a <-data.frame(case=paste("S",1:50)),values=runif(50))
   attach(a)
   plot(case,values)

3. a <-data.frame(case=paste("S",1:50)),values=runif(50))
   with(a,{
   plot(case,values)
   x<<-summary(values) #求和并赋值给x,<<的意思是作为全局变量，也就是出了大括号仍有效。
   })

   
   
   微信截图_20200228203930.png

思考题

可能未定义x