什么是向量
标量:一个元素组成的变量,例如 4
向量:多个元素组成的变量,例如 c(1,2,3,'ss')
元素:数字或者字符串(用chr表示)等
从向量中提取元素
根据元素的位置
> x <- c(4,6,3,6,1,8,5,3) #给x赋值
> x #打印x
4 6 3 6 1 8 5 3
> x[2] #打印x第二位的元素
6
> x[-2] #打印x除第二位的元素
4 3 6 1 8 5 3
> x[2:4] #打印x 2-4位的元素
6 3 6
> x[-(2:4)] #打印x 除2-4位的元素
4 1 8 5 3
> x[c(1,4)] #打印x 第1、4位的元素
4 6
根据值
> x[x==6] #等于6的元素
6 6
> x[x<4] #小于4的元素
3 1 3
> x[x %in% c(1,4,5)] #存在于向量c(1,4,5)中的元素
4 1 5
> x[x %in% c(1,4,10)] #存在于向量c(1,4,5)中的元素
4 1
>
读取本地文件为数据框
read.table(file = 'huahua.txt',sep = '\t',header = T)
a <- read.table(file = 'huahua.txt',sep = '\t',header = T)
设置行名和列名
x <- read.csv(file = 'doudou.txt')
colnames(x)
rownames(x)
colnames(x)[1]<-"bioplanet" #将第一列的列名修改为bioplanet
X<-read.csv(file = "huahua.txt",sep = " ",header =T,row.names=1) #使第一列为行名
导出数据框
write.table(X,file = "lify.txt",sep = ",",quote=F)#分隔符改为逗号,字符串不加双引号(默认格式带由双引号)
#保存变量与加载变量
save.image(file="bioinfoplanet.RData") #保存当前所有变量
save(X,file="test.RData") #保存其中一个变量
load("bioinfoplanet.RData") #再次使用RData时的加载命令
提取元素
x[2,]
x[,1]
x[1] #同上
x[c(1,2)]
x$X2 #按列名提取
使用数据框中的变量
options(stringsAsFactors = T) #字符被识别为因子
a <-data.frame(case=paste0("S",1:9),values=runif(9))
plot(a$case,a$values)
如何不输入数据框名调用其中的元素
attach
attach(a)
plot(case,values)
detach(a)
with
with(a,{
plot(case,values)
x<<-summary(values) #求和并赋值给x,<<的意思是作为全局变量,也就是出了大括号仍有效。
})
题目
save(X,file="test.RData")
上面这句代码如果报错object X not found,是为什么,应该怎么解决?
回答:是workspace中没有X这个变量,解决办法:检查是否是拼写错误或者重新运行X的赋值代码