dev.off()關(guān)閉圖形設(shè)備

null device

1.標量和向量的區(qū)分

變量.png

元素指的是數(shù)字或者字符串（用chr表示)

2.賦值

x<- c(1,2,3) #常用的向量寫法，意為將x定義為由元素1，2，3組成的向量。
x
x<- 1:10 #從1-10之間所有的整數(shù)
x
x<- seq(1,10,by = 0.5) #1-10之間每隔0.5取一個數(shù)（注意是逗號不是分號）
x
x<- rep(1:3,times=2) #1-3 重復(fù)2次
x

3.從向量中提取元素

根據(jù)元素位置

x[4] #x第4個元素
x[-4]#排除法，除了第4個元素之外剩余的元素
x[2:4]#第2到4個元素
x[-(2:4)]#除了第2-4個元素
x[c(1,5)] #第1個和第5個元素

根據(jù)值

x[x==10]#等于10的元素
x[x<0]
x[x %in% c(1,2,5)]#存在于向量c（1，2，5）中的元素

3.數(shù)據(jù)框

（1）讀取本地數(shù)據(jù)

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

（2）設(shè)置行名和列名

X<-read.csv('doudou.txt')
X
colnames(X)
rownames(X)
colnames(X)[1]<-"bioplanet"

X<-read.csv(file = "huahua.txt",sep = " ",header =T,row.names=1)#最后row.names的意思是修改第一列為行名

（3）數(shù)據(jù)框的導(dǎo)出

write.table(X,file = "yu.txt",sep = ",",quote=F)#分隔符改為逗號，字符串不加雙引號（默認格式帶由雙引號） 

（4）變量的保存與重新加載

#保存和重新加載。保存的格式是RData。
save.image(file="bioinfoplanet.RData")#保存當前所有變量
save(X,file="test.RData")#保存其中一個變量
load("test.RData")#再次使用RData時的加載命令

（5）提取元素

X$列名
X[x,y]

直接使用數(shù)據(jù)框中的變量

options(stringsAsFactors = T)
a <-data.frame(case=paste0("S",1:9),values=runif(9))
plot(a$case,a$values)

簡化操作case,values的提取
方法1：attach

將數(shù)據(jù)框名添加到搜索環(huán)境中：attach（a）,作圖時就只需輸入列名(連$都不用了)。

attach(a)
plot(case,values)
做完后將a刪除出搜索環(huán)境 detach（a）

局限性：兩個以上數(shù)據(jù)框的列名有沖突時，同時attach會報錯。
方法2：with

with(a,{
 plot(case,values)
x<<-summary(values)   #求和并賦值給x,<<的意思是作為全局變量，也就是出了大括號仍有效。
})
x #運行x