How can I draw a corner and Semi-Circle outside penalti area in R?

Question

this is the code that I draw in RStudio, but I dont know how I can put the arcs in corners and outside the area. Im a begginer and I dont know if I need to use geom_circle o