Вы можете удалить конечные десятичные дроби, вручную указав метки для точек оси с помощью аргумента labels
для scale_y_sqrt()
или любого другого scale_*_continuous()
Код ниже должен дать вам то, что выищу:
scale_y_sqrt(
expand = c(0, 0), limits = c(0, ),
breaks = c(
0, 0.01, 0.025, 0.05, 0.1, 0.25,
0.5, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10
),
labels = c(
"0", "0.01", "0.025", "0.05", "0.1", "0.25",
"0.5", "1", "2", "3", "4", "5", "6", "7", "8", "9", "10"
),
)
А вот небольшой воспроизводимый пример, чтобы более полно проиллюстрировать общую мысль:
library(tidyverse)
data.frame(x = rnorm(100), y = rnorm(100)) %>%
ggplot(aes(x = x, y = y)) +
geom_point() +
scale_y_continuous(
breaks = c(-2, -1, 0, .5, 1, 2),
labels = c("-2", "-1", "0", "0.5", "1", "2")
)