Add save to PNG instead of manually saving it from RStudio