· 小知識(shí)點(diǎn)
- 表格在R語(yǔ)言中改名叫數(shù)據(jù)框
- 數(shù)據(jù)類型
向量（vector）
數(shù)據(jù)框（Data frame）
矩陣（Matrix）
數(shù)組（Array）
List
Part1 向量
1.標(biāo)量和向量的區(qū)分
首先明確“元素”的意思，元素指的是數(shù)字或者字符串（用chr表示）等，根據(jù)它可以區(qū)分兩個(gè)詞：
標(biāo)量：一個(gè)元素組成的變量
向量：多個(gè)元素組成的變量
賦值：
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取一個(gè)數(shù)（注意是逗號(hào)不是分號(hào)）
x
x<- rep(1:3,times=2) #1-3 重復(fù)2次
x
如果你把這幾行代碼都打過(guò)了，那么x就被你賦值了4次，結(jié)果就是，第一次賦值被第二次的覆蓋了，第二次的賦值又被第三次的覆蓋了，以此類推，以最后一次為準(zhǔn)。
2.從向量中提取元素
（1）根據(jù)元素位置
#這里的x是你剛才賦值的變量名，根據(jù)自己的情況來(lái)修改
x[4] #x第4個(gè)元素
x[-4]#排除法，除了第4個(gè)元素之外剩余的元素
x[2:4]#第2到4個(gè)元素
x[-(2:4)]#除了第2-4個(gè)元素
x[c(1,5)] #第1個(gè)和第5個(gè)元素
（2）根據(jù)值
x[x==10]#等于10的元素
x[x<0]
x[x %in% c(1,2,5)]#存在于向量c（1，2，5）中的元素
Part2 數(shù)據(jù)框
# 讀取本地?cái)?shù)據(jù)
# 讀取huahua文件
X <- read.csv("huahua.txt",sep = "",header = T,row.names = 1)
# 讀取doudou文件
A <- read.csv("doudou.txt")
# 設(shè)置行列名
colnames(X) #查看列名
rownames(X) #查看行名,默認(rèn)值的行名就是行號(hào)，1.2.3.4...
colnames(X)[1]<-"bioplanet"#有的公司返回?cái)?shù)據(jù)，左上角第一格為空，R會(huì)自動(dòng)補(bǔ)為x,用這個(gè)命令來(lái)修改
X<-read.csv(file = "huahua.txt",sep = " ",header =T,row.names=1)#最后row.names的意思是修改第一列為行名
# 數(shù)據(jù)框?qū)С?write.table(X,file = "yu.txt",sep = ",",quote=F)#分隔符改為逗號(hào)，字符串不加雙引號(hào)（默認(rèn)格式帶由雙引號(hào)）
# 變量的保存與重新加載
#這次沒(méi)有處理完的數(shù)據(jù)下次想接著用怎么辦?--學(xué)會(huì)保存和重新加載。保存的格式是RData。
save.image(file="bioinfoplanet.RData")#保存當(dāng)前所有變量
save(X,file="test.RData")#保存其中一個(gè)變量
load("test.RData")#再次使用RData時(shí)的加載命令
# 提取元素
x[x,y] #提取x行y列
x[x,] #提取x行
x[,y] #提取y列
x[y] #默認(rèn)列
x[a:b] #提取a-b列
x[c(a,b)] #提取a,b兩列
x$Y #提取x的Y列，但只能提取一列
- 致謝：生信星球@劉小澤@小潔忘了怎么分身
