Eu fiz um piechart lapidado com ggplot2 assim:

qplot(x=factor(1), data=mtcars, fill=factor(cyl)) + 
    geom_bar(width=1) +  
    coord_polar(theta="y") + 
    facet_grid(~gear)

mas como todos os fragmentos compartilham a escala do eixo y, alguns deles não cobrem o círculo completo. Eu tentei comfacet_grid(~gear, scales="free") mas não funciona.

Como eu poderia obter círculos completos para todos os piecharts?