При создании фасетного графика с помощью ggplot2
и coord_polar
метки моей оси x располагаются очень близко и иногда обрезаются границей панели.
Поэтому я хочу увеличить пробел, ограничивающий сам график (внутри границы панели).В следующем примере используется mtcars
для показа создаваемого мной графика.
Все мои тесты с margin
до сих пор увеличивали пустое пространство вокруг всего графика (включая все панели), а не отдельных панелей.Есть ли способ добиться этого?
library(ggplot2)
cars <- c(rep("ford",8),rep("vauxhall",8),rep("renault",8),rep("tesla",8))
mtcars <- cbind(mtcars,cars)
#plot
ggplot(data=mtcars, aes(x=cars,y=mpg)) +
geom_bar(stat="identity", fill = "darkgrey", colour = NA, alpha = 0.75) +
theme_bw() +
theme(axis.text=element_text(size=8),
axis.text.x=element_text(size=12, margin = margin(t= 50)),
axis.title=element_text(size=14,face="bold"),
strip.text.x = element_text(size=12, face="bold"),
strip.text.y = element_text(size=12, face="bold"),
panel.spacing = unit(1, "lines")) +
xlab("") +
coord_polar(start=-0.4) +
facet_grid(gear ~ am, scales = "free")
ggsave("C:/Sandbox/myplot.png",plot = last_plot(), width = 130, height = 177, units = "mm", dpi = 900)