学习小组Day4笔记--尹露茜

前三天学习的对于我都是新知识
然鹅R我是有基础的
所以昨天的学习没那么上心。。改正
但我学生信真的。。可能不是那么有天赋
至今觉得自己不能实战
像骨骼发育完善却不能迈开步子的小弱鸡
授人以渔 这个学习小组最棒的地方在于教你生信学习的方式
记笔记 写大纲 做思维导图
R可能不需要完美的记忆力 但积累应用就是它的核心
意外发现生信星球公众号里有花花豆豆写的基础教程
今天不忙 适合撸一撸

数据类型

向量（vector）
矩阵（Matrix）
数组（Array）
数据框（Data frame）
List

从向量中提取元素

根据元素位置

x[4] #第4个元素
x[-4]#排除法，除了第4个元素之外剩余的元素
x[2:4]#第2到4个元素
x[-(2:4)]#除了……
x[c(1,5)] #第1个和第5个元素

根据值的大小

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

数据框

读取本地数据

a<-read.table(file = "huahua.txt",sep = "\t",header =T) #把这个数据框赋给一个变量a/ read.csv

设置行名和列名

colnames(X) #查看列名
rownames(X) #查看行名,默认值的行名就是行号，1.2.3.4...
colnames（X）[1]<-"bioplanet"#有的公司返回数据，左上角第一格为空，R会自动补为x,用这个命令来修改
X<-read.csv(file = "huahua.txt",sep = "\t",header =T,row.names=1)#修改第一列为行名

数据框的导出

write.table(X,file = "yu.txt",sep = ",",quote=F)#分隔符改为逗号，字符串不加双引号（默认格式带由双引号） /write.csv
保存与重新加载
save.image(file="bioinfoplanet.RData")#保存当前所有变量
save(frame1,file="frame1.RData")#保存其中一个变量
load （frame1.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$列名 #也可以提取列

直接使用数据框中的变量

c <-data.frame(case=paste("S",c(1:50)),values=runif(50)) plot(c$case,c$values)
方法1: attach(c) plot(case,values)
方法2: with(c,{ plot(case,values) x<<-summary(values)   #求和并赋值给x,<<的意思是作为全局变量，y也就是出了with循环仍有效。}) x #运行完后打印x

屏幕快照 2019-07-05 上午9.41.51.png