настроенный scale_y_continuous() в facet_grid() в ggplot2

Я хочу добавить дополнительную белую линию к фоновой сетке и дополнительную отметку, но только в фасете Отлив, возможно ли это?

Я полагаю, что можно было бы добавить разрыв (при y = 10) к команде scale_y_continuous() в Low Tide или что-то подобное (см. ниже для кода).

_break_ в ‹code›scale_y_continuous()‹/code›

require(ggplot2)
df <- data.frame(cyl = mtcars[,2])
df$Tide  <- ifelse(df$cyl > 4, c('High Tide'), c('Low Tide'))
c <- ggplot(df, aes(factor(cyl)))
c + geom_bar(fill="white", colour="darkgreen", alpha=0.5) +
       facet_grid(. ~ Tide, scales = "free", space = "free") +
       scale_y_continuous(breaks=c(4, 6, 8),
          labels=c("Minimal", "Mild", "Moderate")) +
       scale_x_discrete(breaks=c(6,8,4),
          labels=c("East Coast", "West Coast", "West Coast Summer")) + 
       theme(axis.title.x = element_blank(), axis.title.y  = element_blank(), 
          axis.ticks.x = element_blank(), legend.position = "none") 

person Eric Fail    schedule 30.01.2013    source источник
comment
Я узнал, что с R все возможно, но я не знаю, как это сделать. Тем не менее, обходным путем было бы использование annotate() для размещения метки в аспекте отлива.   -  person Andrie    schedule 30.01.2013
comment
Ответ НЕТ, я думаю. В этом случае вы должны отображать их как отдельные графики и печатать их с двумя столбцами, например, с помощью gridExtra   -  person Arun    schedule 30.01.2013
comment
Сломанные топоры не одобряются и не должны использоваться. Следовательно, они не реализованы в ggplot2. Однако вам может сойти с рук их использование в базовой графике.   -  person Roman Luštrik    schedule 30.01.2013
comment
@RomanLuštrik, я не собираюсь ломать какие-либо топоры, я просто хочу подчеркнуть уровень Severe (при y = 10) на фасете Отлив.   -  person Eric Fail    schedule 30.01.2013
comment
Мне кажется или в этом сюжете нет severe? Кроме того, в вашем вопросе говорится о введении разрыва в грани Low tide, и это то, что @RomanLuštrik объяснил как нарушение осей.   -  person Arun    schedule 30.01.2013
comment
Если я неправильно понял ваш вопрос, прошу прощения.   -  person Roman Luštrik    schedule 30.01.2013
comment
@arun, извините за непонятный язык. Я прошу добавить перерыв в команду scale_y_continuous(), которая создает белые линии и тексты тикетов. Нет, в данных нет уровня «Тяжелый». Я просто добавил это, пытаясь объяснить, почему мне нужна дополнительная строка при y = 10. Есть ли в этом смысл? Я постараюсь обновить свой вопрос как можно скорее. Не стесняйтесь предлагать изменения, которые, по вашему мнению, прояснят то, что я хочу сделать.   -  person Eric Fail    schedule 30.01.2013
comment
@RomanLuštrik, моя запутанная формулировка не облегчила задачу. Я ценю ваши отзывы!   -  person Eric Fail    schedule 30.01.2013