facechado piechart con ggplot2

He hecho un piechart facetado con ggplot2 como este:

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

pero como todos los elementos comparten la escala del eje y, algunos de ellos no cubren el círculo completo. Lo he intentado confacet_grid(~gear, scales="free") pero no funciona

¿Cómo podría obtener círculos completos para todos los piecharts?

Respuestas a la pregunta(1)

Su respuesta a la pregunta