R ggplot изменить размер текстовой панели оси - PullRequest
0 голосов
/ 31 марта 2020

Я везде искал решение своей проблемы, но не смог найти правильный ответ. У меня есть координатная полярная диаграмма, созданная в R с использованием ggplot, проблема в том, что у меня очень длинные метки, и я не знаю, как изменить размеры текста на оси x панели. (Я мог видеть это с debug = TRUE, и слово усекается).

Извините, если я не могу объяснить свою проблему, но это изображение может быть полезным: enter image description here

"Желтый" прямоугольник - это файл axis.text. х, в то время как «серый» прямоугольник является plot.background, я могу изменить только размер этого. Я также хотел бы отодвинуть якоря от графика, если это возможно.

Не знаю, полезно ли, но я выложу код ggplot:

  geom_col(aes(x = Category, fill=Category,y = Percentage),width = 0.9) +
  #geom_col(aes(x = Category, fill = Category, y = Percentage),width = 0.9) +
  geom_hline(yintercept = seq(0, 100, by = 20),
             color = "gray",
             size = 0.1) +
  geom_vline(xintercept = seq(.5, 9.5, by = 1),
             color = "gray",
             size = 0.1) +
  #geom_vline(xintercept = seq(0, 9, by = 1),color = "red",size = 0.1) +
  coord_polar() +
  scale_fill_manual(values = colori2) +
  scale_x_discrete(drop = FALSE,labels=vect2)+
  theme_minimal() +
  labs(x = NULL, y = NULL) +
  theme(#axis.text.x=element_rect("arial","plain","black", "12",angle=0),
    axis.text.x=element_text("arial","plain","black", "11",angle=0, debug=TRUE,hjust=0.8,vjust=0),
        axis.text.y =element_blank() ,
        legend.position = "none",
        panel.grid = element_blank(),
        plot.margin = margin(0, 6, 0,6, "cm"),
        plot.background = element_rect(
          fill = "grey90",
          colour = "black",
          size = 1,
        ),
    panel.background = element_rect(fill="orange", colour="white", size=2),
    #panel.margin.x=unit(8, "cm"),
    #panel.spacing.x=unit(8, "cm")
        )```


Thanks everyone for the help.
...