学习小组 Day 5 笔记--Danny
2019-10-13 本文已影响0人
Danny_dddf
我是新手记下来
（1）R的赋值符号不是等号，而是<-
（2）在Console 控制台输入命令，相当于Linux的命令行
（3）R的代码都是带括号的，括号必须是英文的。
（4）显示工作路径 getwd()
设置工作路径 setwd("C:/Users/kingjie/Desktop/Rdata")
（5）向量是由元素组成的，元素可以是数字或者字符串。
（6）表格在R语言中改名叫数据框_
（7）函数或者命令不会用时，用这个命令查看帮助：?read.table
（8）数据类型
向量（vector）👈重要
矩阵（Matrix）
数组（Array）
数据框（Data frame）👈重要
List
setwd只是此次临时修改，可以通过tools-global options修改永久路径路径，链接在此Rstudio 修改工作路径方法总结
1.向量
标量：一个元素组成的变量
向量：多个元素组成的变量
x<-c(1,2,3) #常用的向量定义写法，意为将x定义为由元素1，2，3组成的向量。
x<-(1:10) #从1-10之间所有的整数
x<-seq(1,10,by = 0.5) #1-10之间每隔0.5取一个数（注意这里是逗号不是分号）
x<-rep(1:3,times=2) #1-3 重复2次
2.从向量中提取元素
（1）根据元素位置
#这里的x是你刚才赋值的变量名，根据自己的情况来修改
x[4] #x第4个元素
x[-4]#排除法，除了第4个元素之外剩余的元素
x[2:4]#第2到4个元素
x[-(2:4)]#除了……
x[c(1,5)] #第1个和第5个元素
（2）根据值的大小
x[x==10]#等于10的元素
x[x<0]
x[x %in% c(1,2,5)]#存在于向量c（1，2，5）中的元素
3.数据框
X<-read.csv('doudou.txt')
print(x)
image.png
3.1读取本地数据
read.table(file = "huahua.txt",sep = "\t",header =T) #读取文件，分隔符为Tab，有表头
a<-read.table(file = "huahua.txt",sep = "\t",header =T)#把这个数据框赋给一个变量a
3.2设置行名和列名
X<-read.csv('doudou.txt') #在示例数据里有doudou.txt 注意这里的变量X是一个数据框
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)#最后row.names的意思是修改第一列为行名
image.png
3.3数据框的导出
write.table(X,file = "yu.txt",sep = ",",quote=F)#分隔符改为逗号，字符串不加双引号（默认格式带由双引号）
3.4变量的保存与重新加载
#这次没有处理完的数据下次想接着用怎么办?--学会保存和重新加载。保存的格式是RData。
save.image(file="bioinfoplanet.RData")#保存当前所有变量
save(frame1,file="frame1.RData")#保存其中一个变量
load("frame1.RData")#再次使用RData时的加载命令
有个疑问，frame1哪来的？啥意思？
3.5提取元素
- 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自动补全哦，不过只能提取一列）
image.png
剩下没看懂，先贴着，回头看
3.6直接使用数据框中的变量
提取某两列作散点图：这里的case和values是两个单纯的列名
c <-data.frame(case=paste("S",c(1:50)),values=runif(50))
> plot(c$case,c$values)
方法1：attach
-将数据框名添加到搜索环境中：attach（c）,作图时就只需输入列名(连$都不用了)。
attach(c)
plot(case,values)
-做完后将a删除出搜索环境 detach（c）
-局限性：两个以上数据框的列名有冲突时，同时attach会报错。
方法2：with
with(c,{
+ plot(case,values)
x<<-summary(values) #求和并赋值给x,<<的意思是作为全局变量，y也就是出了with循环仍有效。
})
x #运行完后打印x
with循环，稍后查
