vertical semi-circles in R

Dear useRs,


I am to teach my students some drawing techniques in R. I started shape of an handle by using the following codes;

plot(0,0,col="white")

segments(0,0,0.3,0.3)

segments(0.3,0.4,0.3,0.3)

segments(0.3,0.4,0,0.7)

segments(0,0.7,0,0.6)

segments(0,0.0,0,0.1)

The coding will draw a section of a handle. Now I want to draw semi circles of radius 0.05 between (0,0.6) and (0,0.1), oriented vertically and outward with mouth facing against the y-axis.

I tried every help available online but to no use.

Thanks in advance,

EB