Збільшити кількість кліщів осі

Я генерую сюжети для деяких даних, але кількість кліщів занадто мала, мені потрібно більше точності щодо читання.

Чи є спосіб збільшити кількість кліщів осі в ggplot2?

Я знаю, що можу сказати ggplot використовувати вектор як осі кліщів, але те, що я хочу, це збільшити кількість кліщів для всіх даних. Іншими словами, я хочу, щоб номер галочки був обчислений з даних.

Можливо, ggplot робить це всередині за допомогою якогось алгоритму, але я не зміг знайти, як це зробити, щоб змінити відповідно до того, що я хочу.

Ви можете змінити масштаб ggplots за замовчуванням, змінивши scale_x_continuousта / або scale_y_continuous. Наприклад:

library(ggplot2)
dat <- data.frame(x = rnorm(100), y = rnorm(100))

ggplot(dat, aes(x,y)) +
  geom_point()

Надає вам це:

А переосмислення ваг може дати вам щось подібне:

ggplot(dat, aes(x,y)) +
  geom_point() +
  scale_x_continuous(breaks = round(seq(min(dat$x), max(dat$x), by = 0.5),1)) +
  scale_y_continuous(breaks = round(seq(min(dat$y), max(dat$y), by = 0.5),1))

Якщо ви хочете просто «збільшити масштаб» на конкретній частині сюжету, подивіться xlim()і ylim()відповідно. Добре розуміння можна знайти тут , щоб зрозуміти інші аргументи , а також.

На основі коментаря Даніеля Кризіана ви також можете використовувати pretty_breaksфункцію з scalesбібліотеки, яка імпортується автоматично:

ggplot(dat, aes(x,y)) + geom_point() +
scale_x_continuous(breaks = scales::pretty_breaks(n = 10)) +
scale_y_continuous(breaks = scales::pretty_breaks(n = 10))

Все, що вам потрібно зробити - це вставити кількість потрібних кліщів n.

Трохи менш корисне рішення (оскільки вам доведеться знову вказати змінну даних), ви можете використовувати вбудовану prettyфункцію:

ggplot(dat, aes(x,y)) + geom_point() +
scale_x_continuous(breaks = pretty(dat$x, n = 10)) +
scale_y_continuous(breaks = pretty(dat$y, n = 10))

Ви можете надати аргумент функції scale, і ggplot буде використовувати цю функцію для обчислення розташування галочок.

library(ggplot2)
dat <- data.frame(x = rnorm(100), y = rnorm(100))
number_ticks <- function(n) {function(limits) pretty(limits, n)}

ggplot(dat, aes(x,y)) +
  geom_point() +
  scale_x_continuous(breaks=number_ticks(10)) +
  scale_y_continuous(breaks=number_ticks(10))

Майбутня версія v3.3.0 ggplot2буде мати можливість n.breaksавтоматично генерувати перерви для scale_x_continuousтаscale_y_continuous

    devtools::install_github("tidyverse/ggplot2")

    library(ggplot2)

    plt <- ggplot(mtcars, aes(x = mpg, y = disp)) +
      geom_point()

    plt + 
      scale_x_continuous(n.breaks = 5)

    plt + 
      scale_x_continuous(n.breaks = 10) +
      scale_y_continuous(n.breaks = 10)

Крім того,

ggplot(dat, aes(x,y)) +
geom_point() +
scale_x_continuous(breaks = seq(min(dat$x), max(dat$x), by = 0.05))

Працює для бінних чи дискретних масштабованих даних по осі x (тобто, округлення не потрібно).