Yes there is. It is called esquisse

### Loading the package
install.packages("esquisse")
library(esquisse)

### Load enviroment with data
esquisser(palmerpenguins::penguins)

### Thats it

For an intro:

https://dreamrs.github.io/esquisse/articles/get-started.html

Saved me a lot of time and it automatically creates the code for your plot.