查看帮助:?read.table
标量:一个元素组成的变量
向量:多个元素组成的变量(一个向量是一排有序排列的元素)
x<-c(1,2,3)
x<-(1:10)
x<-seq(1,10,by=0.5) #1-10之间每隔0.5取一个数,如下所示
x<-rep(1:3,times=2)# 从1到3,重复出现2次
x[4] # 取X的第4个元素
x[-4] #除了第4个元素以外,都取,排除法
x[2:4] #取第2到第4个元素
x[-(2:4)] #除了第2到第4个元素,都取
x[c(1,5)] # 取第1和第5个元素 ; x[1,5] 这样好像不行
x[x==10] # X中等于10的元素,如果没有会就会返回 integer(0)
x[x %in% c(1,2,5)] # 存在于第1,2,5位置中的元素
读txt文件,sep 是分隔符,header是否有表头
read.table(file = "huahua.txt",sep = "\t",header = T)
a<-read.table(file = "huahua.txt",sep = "\t",header =T)
X<-read.csv("doudou.txt")
colnames(X) #查看列名
rownames(X)# 查看行名
colnames(X)[1]<-"bioplanet" #修改左上角第一格为bioplanet
X<-read.csv(file="huahua.txt",sep = "\t",header = T)
X<-read.csv(file="huahua.txt",sep = "\t",header = T,row.names = 1) #设置第一列为列名
write.table(X,file = "yu.txt",sep = ",",quote = F) #输出文件,quote = F 为不加引号
save.image(file = "bioinfoplanet.RDdata") 保存当前所有变量
save(X,file = "frame1.RDdata") #保存其中一个变量
做散点图
c<-data.frame(case=paste("S",c(1:50)),values=runif(50))# paste是将S粘贴在1-50的旁边,即S1,S2这样;
plot(case,values) # case为X轴,values为Y轴
attach(c) #将数据框C直接添加到环境变量中
detach(c) #将数据框C从环境变量中删除