more Set Intersection

R