How to create a Reproducible Example in R using reprex