Я хотел бы полностью удалить метки для фасетов, чтобы создатьsparkline эффект, что для аудитории лейблы не имеют значения, лучшее, что я могу придумать, это:

<code>library(MASS)
library(ggplot2)
qplot(week,y,data=bacteria,group=ID, geom=c('point','line'), xlab='', ylab='') + 
     facet_wrap(~ID) + 
     theme(strip.text.x = element_text(size=0))
</code>

Так можно ли полностью избавиться от (теперь пустого) полосы strip.background, чтобы освободить место для «спарклайнов»?

Или, альтернативно, есть лучший способ получить это & quot;sparkline& Quot; эффект для большого числа бинарных временных рядов, как это?