I want to create a circle of area 100 as an sf object. I thought st_buffer() would do it, but the area is slightly less than 100.
pt.df <- data.frame(pt