Я сделал граненую круговую диаграмму с ggplot2 следующим образом:

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

но поскольку все круговые диаграммы имеют общий масштаб по оси Y, некоторые из них не охватывают полный круг. Я пробовал сfacet_grid(~gear, scales="free") но это не работает

Как я могу получить полные круги для всех круговых?