ggsave("plot.png", g, height=5, width=5, dpi=1200)