内容

Snipaste_2021-05-16_17-01-53.png

1.建立

向量：

x <- c(1,2,3)
x
x <- c(1:10)
x
x <- seq(from=1,to=10,by=0.5)
x
x <- rep(1:3,times=2)
x
x <- rep(c(1,3),each=2)
x
x <- rep(1:3,len=6)
x

数据框：

setwd('E:/Rdata-shengxin')
a <- read.table('huahua.txt',sep='\t',header = T)#文件中导入数据框
a <-data.frame(case=paste0("S",1:9),values=runif(9))#自创建数据框

2.提取子集

向量：

x[4]
x[-4]
x[2:4]
x[-(2:4)]
x[c(1,5)]
#不会改变原本x，每次都是调取原来的x
x[x==10]
x[x==1]
x[x<0]
x[x %in% c(1,2,5)]#判断x中的元素是否在向量中

数据框：

X[x,y]
X[4,1]
X[x,]
X[1,]
X[,y]
X[,1]
X[a:b]#列
x[1:2]
X[c(a,b)]#列
x[c(1,2)]
X$列名
X$X2`

3.数据框命名

colnames(x)
rownames(x)
colnames(x)[1] <- 'bioplanet'
x
X <- read.table('E:/Rdata-shengxin/huahua.txt',sep = '\t',header = T,row.names = 1)
names(x) <- 'num'
x

4.导出、保存、重加载

write.table(X,file = 'yu.txt',sep = ',',quote = F)
save.image(file="bioinfoplanet.RData")
save(X,file="test.RData")
load("test.RData")

作业：save(X,file="test.RData")这句代码如果报错object X not found，是为什么，应该怎么解决？
说明X这个对象在R工作环境中要么不存在要么被删除，应查看X是否存在使用以下代码的其中之一即可查看

X
View(X)