取子集即簡單篩選數(shù)據(jù)
加載csv并賦值為xm
xm <- read.csv(省略)
class(xm)
is.na(xm)
1、which篩選
示例1:提取前10行,第1,6,7列的內(nèi)容,賦值xm1
xm1 <-xm[c(1:10),c(1,6,7)] #提取前10行,第1,6,7列的內(nèi)容,賦值
View(xm1)#View以單獨的窗口展示列表
示例2:對xm進行pct.1>0.5條件篩選,賦值為xm2
xm$pct.1
xm2 <- xm[which(xm$pct.1>0.5),]#注意加逗號,指定行列
View(xm2)
示例3:多個條件進行篩選
兩個列條件篩選的交集,要用同一個which,放在小括號中,用&連接??
xm3 <- xm[which(xm$pct.1>0.5&xm$pct.2<0.5),]#兩個列條件篩選的交集,要用同一個which
View(xm3)
本來是這樣試的,發(fā)現(xiàn)取的是并集
xm4 <- xm[which(xm$pct.1>0.5)&which(xm$pct.2<0.5),]
2、subset取子集篩選
對象,篩選條件
subset(xm,xm$pct.1>0.5&xm$pct.2<0.5,)
xmsubset <- subset(xm,xm$pct.1>0.5&xm$pct.2<0.5,)
View(xmsubset)
對象,篩選條件,添加select取出哪幾列進行展示
xmsubset2 <- subset(xm,xm$pct.1>0.5&xm$pct.2<0.5,select = c(pct.1,pct.2,gene))
View(xmsubset2)
【注】
- View首字母大寫
- 操作之后記得賦值,賦值之后才能改寫,否則只是展示
- 重復(fù)命名會覆蓋之前的,取名不要重復(fù),也不要為了好寫太簡單
- 不在當前工作路徑的,讀入時候要寫全路徑,用Tab進行補全,很方便
?? ??
??