查看帮助：?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从环境变量中删除