黃河泉 发表于 2022-4-22 11:08 
试试
感谢老师。其实我看过老师17年的一个回复,但没能举一反三

* Example generated by -dataex-. To install: ssc install dataex
clear
input float(hhid p a3000 a3020)
1 1 1 .
1 2 1 3000
1 3 1 4100
2 1 1 6000
2 2 2 .
end
bys hhid (p): egen c1 = total(a3000 == 1)
bys hhid (p): egen c2 = total(a3020 < .)
drop if c1 != c2