获得具有不同比例的2x2 facet_grid

Question

我有一些很好的格式的数据，我希望在2x2帧上进行绘图，每个单独的绘图都有自己的X和Y刻度。这是我现在使用的代码：

    p <- ggplot(data=temp,aes(x=variable,y=value,group=custno,color=cluster)) + 
      geom_path(alpha=0.4) +
      theme_bw() + 
      theme(legend.title=element_blank(),axis.text.y=element_text(hjust=0, angle=0), 
            axis.text.x = element_text(hjust=1, angle=45),plot.title=element_text(size=20)) +
      ylab('Revenue') +
      xlab('') + ggtitle('') +
      scale_color_manual(values=c('#66c2a5','#fc8d62','#8da0cb','#e78ac3')) + 
      facet_grid(.~cluster,scales='free',space='free')
    p

这是我得到的情节：

我希望有一个带有不同比例的2x2网格，因此类别3更加美化，差异更加明显。

这是示例数据

custno variable value cluster
100 Month1  169.15  3
250 Month1  4012.15 1
303 Month1  2731.08 1
312 Month1  890.40  2
337 Month1  1133.40 3
100 Month2  169.15  3
250 Month2  4012.15 1
303 Month2  2731.08 1
312 Month2  890.40  2
337 Month2  1133.40 3
100 Month3  169.15  3
250 Month3  4012.15 1
303 Month3  2731.08 1
312 Month3  890.40  2
337 Month3  1133.40 3
100 Month4  169.15  3
250 Month4  4012.15 1
303 Month4  2731.08 1
312 Month4  890.40  2
337 Month4  1133.40 3
100 Month5  169.15  3
250 Month5  4012.15 1
303 Month5  2731.08 1
312 Month5  890.40  2
337 Month5  1133.40 3
100 Month6  169.15  3
250 Month6  4012.15 1
303 Month6  2731.08 1
312 Month6  890.40  2
337 Month6  1133.40 3

非常感谢任何帮助。

Answer 1

您想要替换

facet_grid(.~cluster,scales='free',space='free')

用

facet_wrap(~ cluster, scales = 'free', space = 'free', nrow = 2)

facet_wrap和facet_grid之间的区别在于facet wrap可以执行＆＃34;换行符＃34;在一个变量内。 facet_grid实际上是为一个绘图网格制作的，其中一个（或多个）变量定义了列和定义行的不同变量，因此这些换行没有意义。