мы сделали граненую круговую диаграмму с помощью 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") но это нет работа.

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