ř滤波列具有相等值

Question

可以说，我有一个数据组这样

`v6 v7 v8 v9 
x 123 123 x 
x 123 456 x 
x 789 789 x 
x 123 789 x ` 

我怎么过滤，以便只在其中用于列7和8的值是彼此相等的行是退出，继续仍然过滤后保留列标题？我试过这段代码：

hg19 -> hg19[which(hg19$V7 == hg19$V8),]

和验证码：

non_coding= subset(hg19,hg19[8] == hg19[7]) 

其中hg19是数据集。 note：真实数据集有超过99,000行和16列

Answer 1

给予您的代码正常工作并保留原始列名称。

hg19[which(hg19$v7==hg19$v8),] 
    v6 v7 v8 v9 
1 x 123 123 x 
3 x 789 789 x 

Answer 2

non_coding <- subset(hg19, hg19$v7 == hg19$v8)