library(dplyr)
df=data.frame(A=c(5,6,7,8),B=c(1,7,5,9))
filter(df,A>B)

> filter(df,A>B)
  A B
1 5 1
2 7 5

谢谢回复，能知道选出的这些行是第几行吗？

加多一行C列标识行数
> df=data.frame(A=c(5,6,7,8),B=c(1,7,5,9),C=1:4)
> filter(df,A>B)
  A B C
1 5 1 1
2 7 5 3

data<-read.table("C:\\1.txt")   ##读取C盘1.txt文件
data                   ##列出数据
dLength<-nrow(data)    ##获取列数，两列列数必须相等
dNum<-1                ##赋值辅助向量
dList<-c()             ##列表向量
class(data$V1)         ##向量类型
attach(data)
while(dLength+1>dNum)  ##循环结构
  {

  dV1<-V1[dNum]   ##取出每行的数据
  dV2<-V2[dNum]
  if (dV1>dV2)        ##比较大小
  {
    dList<-c(dList,dNum)  ##合并向量
  }
  dNum<-dNum+1

  }
detach(data)
dList     

非常感谢了，问题解决了