library(dplyr)
df %>%
filter(时间 == as.Data("2016-07-01"), 地点 == "a", 名称 == "A", 结果 == "通过") %>%
summarise(nrow = n(), sum_数量 == sum(数量))

在R语言中，简单问题就不用劳烦循环语句了。

谢谢！我赶紧试一试

你好，我的数据源名称是M0725，我把代码修改了一下df%>%
filter(M0725$时间==as.Date('2016/7/1'),M0725$地点=="a",M0725$名称=="A",M0725$结果=="通过")%>%
summarise(nrow=n(M0725$名称),sum_数量==sum(M0725$数量))
显示错误：Error in UseMethod("filter_") :
  "filter_"没有适用于"function"目标对象的方法
请问一下问题出在哪儿呢？

M0725 %>%
filter(时间 == as.Data("2016-07-01"), 地点 == "a", 名称 == "A", 结果 == "通过") %>%
summarise(nrow = n(), sum_数量 == sum(数量))

"df"指的就是你的"M0725"