生信星球培训第八十五期

Day5数据结构-谢大飞

2020-10-20  本文已影响0人  谢大飞7698

数据结构

向量

1.定义

标量:一个元素组成的变量
向量:多个元素组成的变量
元素:数字或者字符串
在使用标量和向量时要给其赋值,就是给变量定义,令它为什么

 x <- c(1,2,3)                      将X定义为元素1,2,3组成的向量(记得要带上c,不然会出错)     
 x <- (1:10)                         将X定义为从1到10 之间所有的整数
x <- seq(1,10,by = 0.5)      将X定义为1-10之间每隔0.5取一个数
 x <- rep(1:3,times=2)        定义为1-3之间的整数,重复两次

因为向量没变,所以每个新赋予的值会覆盖上次赋值


Snipaste_2020-10-20_20-04-24.png

查看变量

Snipaste_2020-10-20_20-07-20.png

2.从向量中提取元素

2.1根据元素位置来提取
 x[4]                      提取第四个元素  
x[-4]                      提取除了第四个元素之外的元素
x[2:4]                    提取第二个到第四个元素
 x[-(2:4)]               提取除了第二个到第四个的元素
x[c(1,5)]                提取第一个到第五个元素

2.2根据值来提取

x[x==10]                  提取等于10的元素
x[x<0]                      提取小于0的元素
x[x%in%c(1,2,5)]    提取存在于向量c(1,2,5)中的元素
Snipaste_2020-10-20_20-24-53.png

2.数据框

新建一个示例数据框
在工作目录下新建一个文本文件命名为 xyf.txt
(我是在D盘里面找到了我的R语言的文件夹,然后新建了一个文本文件,貌似可以直接在Rstudio里面新建)
在xyf.txt 中输入

X1.X2
A.1
B.
C.
D.3
E.

然后保存退出,回到Rstudio显示出数据框
X<-read.csv('xyf.txt')

Snipaste_2020-10-20_20-34-26.png

1.读取本地数据

 read.table(file = "xyf.txt",sep = "\t",header = T)
 a<- read.table(file = "xyf.txt",sep = "\t",header = T)

2.设置行名和列名

X<-read.csv('xyf.txt')                 将X赋值为xyf.txt 数据框
colnames(X)                             查看列名
 rownames(X)                           查看行名
colnames(X)[1]<-"bioplanet"    更改列名
X<-read.csv(file = "xyf.txt",sep = " ",header = T,row.names = 1)    更改行名

更改列名

Snipaste_2020-10-20_21-16-03.png

更改行名

Snipaste_2020-10-20_21-16-28.png
(啥都没了)

恢复为最初的模样

read.table(file = "xyf.txt",sep = "\t",header = T)
a<- read.table(file = "xyf.txt",sep = "\t",header = T)
X<-read.csv('xyf.txt')
 View(X)
Snipaste_2020-10-20_21-17-27.png

3.数据框的导出

write.table(X,file = "yu.txt",sep = ",",quote=F)           将xyf.txt导出为yu.txt,但是源文件还在
read.table(file = "yu.txt",sep = "\t",header = T)         将yu.txt 读取出来
a<- read.table(file = "yu.txt",sep = "\t",header = T)
Y<-read.csv('yu.txt')
View(Y)
Snipaste_2020-10-20_21-25-38.png

4.变量的保存与重新加载

save.image(file = "bioinfoplanet.RData")      保存当前所有的变量
save(X,file = "test.RData")                            保存其中一个变量X
load("test.RData")                                         重新加载

Snipaste_2020-10-20_21-33-41.png

5.提取元素

X[1,2]        提取第一行第二列
X[1,]           第一行
X[,1]           第一列
X[1]            第一列
 X[1:1]       第一列
X[c(1,1)]    第一列(哈哈哈哈,我只有一列)
X$X1.X2   提取第一列
Snipaste_2020-10-20_21-39-43.png

今日份思维导图

Snipaste_2020-10-20_21-47-09.png
上一篇 下一篇

猜你喜欢

热点阅读