"Copy as metafile" in Rgui, as well as default ggsave(), scale the whole figure to the top left quarter

"Copy as metafile" in Rgui, as well as default ggsave(), scale the whole figure to the top left quarter #7328