ggplot增加华夫饼图的大小答案

【问题标题】：ggplot increase size of waffle chartggplot增加华夫饼图的大小
【发布时间】：2017-12-15 20:19:38
【问题描述】：

我有一个看起来像这样的华夫饼图：

使用此代码：

output$DS47<- renderPlot({
plot_tab6<-waffle(DS27$Prozent, rows=11)
  mydata <- c('Auslandsstudium'=57, 'Auslandspraktikum'=  30, 
              'Sprachkurs'=5, 'Studienreise'=11, 'Sonstige'=14 )
  plot_tab6 <- waffle(mydata, title = "lalalalal")
  return(plot_tab6)
})

然而它很小，尤其是传说。我怎样才能增加尺寸？

【问题讨论】：

（?????? 作者在这里）它是coord_fixed()，因此您必须增加绘图输出区域尺寸的大小，直到达到可接受的显示尺寸。
感谢您分享这个！

标签： r ggplot2 size legend waffle-chart

【解决方案1】：

我不知道 waffle 返回一个 ggplot 对象。我用这段代码解决了这个问题：

output$DS47<- renderPlot({
  mydata <- c('Auslandsstudium'=57, 'Auslandspraktikum'=  30, 'Sprachkurs'=5, 'Studienreise'=11, 'Sonstige'=14 )
  plot_tab6 <- waffle(mydata) +
    ggtitle("lalalala ?")+
    theme(plot.title = element_text(hjust = 0.5,size = 27, face = "bold", colour = "darkred"),
                              legend.text = element_text(size = 15))
  return(plot_tab6)
})

【讨论】：