Designing R loops with coordinate values and generating plots

I have two set sets containing 3 x,y coordinate pairs

DataSet 1 (DS1) 1,1: 2,1: 1,2

DataSet 2 (DS2) 5,5: 5,4: 2,2

I want to design a loop that would identify those coordinate pairs in DS2 within 1 "x" or "y" unit of any point in DS1 (for this data set it would only ID DS2 point (2,2)) and then plot DS1 and the identified points in DS2 on the same plot.

Any help