У меня есть такие данные, с последующей прорисовкой данных (вдохновлено этой публикацией):
x_val <- 0:250
y_val <- c(seq(0,1, 0.1), 1:10)
set.seed(1234)
data <- data.frame(x = sample(x_val, 30, replace = TRUE),
y = sample(y_val, 30, replace = TRUE))
library(ggplot2)
p <- ggplot(data, aes(x, y)) + geom_point()
p + scale_y_continuous(breaks = seq(0, 10, by = 1))
I будет sh, чтобы иметь половину оси Y от 0 до 1, а другая половина оси Y от 1 до 10. Любой способ сделать это?
Попытки:
Я пытался
scale_y_continuous(breaks = c(seq(0, 1, 0.1), seq(1, 10, 1)))
, Но это не работает. Я озадачен тем, как атаковать это.
РЕДАКТИРОВАТЬ : просто для ясности, я хочу следующий сюжет
![plot](https://i.stack.imgur.com/twjwD.png)