Я рисую barchart для дискретных данных, и ggplot по умолчанию меняет ось y для меня, но дает мне метку оси y с разрывами в интервале 0,5, который мне не нравится. Я пробовал scale_y_discrete
, но для каждого дискретного значения даются разрывы по оси y, что тоже не хорошо.
Могу ли я заставить разбиение по оси Y состоять только из целочисленного числа и дать соответствующие разрывы для каждого из фасетов?
Пример script выглядит следующим образом:
set.seed(1)
chart.data <- data.frame(x=rep(LETTERS[1:10],3),
y=c(sample(0:10,10,replace=TRUE),
sample(0:100,10,replace=TRUE),
sample(0:1000,10,replace=TRUE)),
group=sort(rep(1:3,10)))
chart <- ggplot(data=chart.data,aes(x=x,y=y))
chart <- chart + geom_bar(stat="identity")
chart <- chart + scale_y_discrete()
chart <- chart + facet_wrap(facets=~group,nrow=1,scale="free_y")
Обновление # 1
Поскольку пост рассматривается как возможный дубликат, script уточняется, чтобы показать более сложный сценарий.