Пользовательские метки для предельных и предельных значений при использовании scale_color_binned в rggplot

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

Вот метод, который работает:

library(ggplot2)

ggplot(mpg, aes(cty, hwy, color = year)) +
  geom_point() +
  scale_color_binned(limits = c(1999, 2008),
                    breaks = c(2000, 2002, 2004, 2006),
                    labels = c('2', '3', '4', '5'),
                    show.limits = F) # proof that this method works for breaks WITHIN limits

Когда для этого графика активируются ограничения, ggplot выдает сообщение об ошибке и не отображает график.

library(ggplot2)

ggplot(mpg, aes(cty, hwy, color = year)) +
  geom_point() +
  scale_color_binned(limits = c(1999, 2008),
                    breaks = c(2000, 2002, 2004, 2006),
                    labels = c('2', '3', '4', '5'),
                    show.limits = T) # method fails when limits are activated

Error in f(): ! Breaks and labels are different lengths

Разрывы и метки, очевидно, имеют одинаковую длину. Возможно, что-то в активации пределов меняет способ формирования вектора метки? Я знаю, где найти код для вектора разрыва ggplot2 (используя ggplot_build() или щелкая непосредственно на сохраненном объекте графика). Я просмотрел их и не нашел ничего, что помогло бы мне понять, как решить эту проблему.

Я также пробовал эти методы, и он вернул ту же ошибку «разрывы и метки имеют разную длину»:

# this did not work

ggplot(mpg, aes(cty, hwy, color = year)) +
  geom_point() +
  scale_color_binned(limits = c(1999, 2008),
                    breaks = c(2000, 2002, 2004, 2006),
                    labels = c('1', '2', '3', '4', '5', '6')
                    show.limits = T) # added more entries to label vector did not work

# this also did not work

ggplot(mpg, aes(cty, hwy, color = year)) +
  geom_point() +
  scale_x_continuous(
    breaks = c(0, 20, 40),
    labels = c("0", "20", "40"))  + 
  scale_color_binned(breaks = c(1999, 2000, 2002, 2004, 2006, 2008),
                     labels = c('1', '2', '3', '4', '5', '6'),
                     show.limits = F) # add limits directly to breaks did not work

Один из методов, который можно использовать для маркировки каждой записи, описан ниже. Однако этот метод утомителен, если имеется несколько записей для дискретной шкалы.

ggplot(mpg, aes(cty, hwy, color = year)) +
  geom_point() +
  scale_color_binned(limits = c('1' = 1999, '6' = 2008),
                    breaks = c('2' = 2000, '3' = 2002, '4' = 2004, '5' = 2006),
                    show.limits = T) # this works, but is a tedious solution when writing several breaks

Я хочу использовать метод scale_color_binned (или аналогичные функции), потому что я хочу преобразовать данные непрерывной шкалы в 15-20 дискретных диапазонов, а затем настроить метку или подавить метки для разных диапазонов.

Есть ли способ создать ggplot, который может принимать пользовательские метки для непрерывных значений в бинах, а также отображать указанные ограничения для данных?

3 метода стилизации элементов HTML
3 метода стилизации элементов HTML
Когда дело доходит до применения какого-либо стиля к нашему HTML, существует три подхода: встроенный, внутренний и внешний. Предпочтительным обычно...
Формы c голосовым вводом в React с помощью Speechly
Формы c голосовым вводом в React с помощью Speechly
Пытались ли вы когда-нибудь заполнить веб-форму в области электронной коммерции, которая требует много кликов и выбора? Вас попросят заполнить дату,...
Стилизация и валидация html-формы без использования JavaScript (только HTML/CSS)
Стилизация и валидация html-формы без использования JavaScript (только HTML/CSS)
Будучи разработчиком веб-приложений, легко впасть в заблуждение, считая, что приложение без JavaScript не имеет права на жизнь. Нам становится удобно...
Flatpickr: простой модуль календаря для вашего приложения на React
Flatpickr: простой модуль календаря для вашего приложения на React
Если вы ищете пакет для быстрой интеграции календаря с выбором даты в ваше приложения, то библиотека Flatpickr отлично справится с этой задачей....
В чем разница между Promise и Observable?
В чем разница между Promise и Observable?
Разберитесь в этом вопросе, и вы значительно повысите уровень своей компетенции.
Что такое cURL в PHP? Встроенные функции и пример GET запроса
Что такое cURL в PHP? Встроенные функции и пример GET запроса
Клиент для URL-адресов, cURL, позволяет взаимодействовать с множеством различных серверов по множеству различных протоколов с синтаксисом URL.
2
0
65
1
Перейти к ответу Данный вопрос помечен как решенный

Ответы 1

Ответ принят как подходящий

Вы получите представление о том, что происходит, если воспользуетесь функцией для маркировки разрывов:

library(ggplot2)

ggplot(mpg, aes(cty, hwy, color = year)) +
  geom_point() +
  scale_color_binned(limits = c(1999, 2008),
                    breaks = c(2000, 2002, 2004, 2006),
                    labels = ~ print(.x),
                    show.limits = TRUE)
#> [1] 2000 2002 2004 2006
#> [1] 1999 2008

Вы можете видеть, что метки для перерывов и для пределов отправляются двумя отдельными пакетами в функцию маркировки, поэтому вектор меток фиксированной длины всегда будет неудачным для того или иного из этих пакетов. Действительно, вам нужна функция, которая может обрабатывать либо:

ggplot(mpg, aes(cty, hwy, color = year)) +
  geom_point() +
  scale_color_binned(limits = c(1999, 2008),
                    breaks = c(2000, 2002, 2004, 2006),
                    labels = ~ if(length(.x) == 2) .x else 1:4,
                    show.limits = TRUE)

enter image description here

Я часами ломал голову над этим и заметил, что show.limits относится к пределу каждой корзины: как этот код работает. library(tidyverse) ggplot(mpg, aes(cty, hwy, color = year)) + geom_point() + scale_color_binned(limits = c(1999, 2008), breaks = c(2000, 2002), labels = c('2', '3'), show.limits = T) . Но только тогда, когда есть два предела. И я надеялся, что вы, или @stefan, или @teunbrand придёте и всё исправите!

TarJae 23.04.2022 10:47

Спасибо. На данный момент этого метода достаточно, и он, вероятно, является одним из наиболее эффективных решений, учитывая текущее программирование для ggplot2. Я также могу подтвердить, что замена вызова для печати '.x' и '1:4' векторами символов будет работать с использованием этого метода. Возможно, стоит отправить заявку на страницу ggplot2 github, чтобы запросить, чтобы поведение разрывов и меток было более интуитивно понятным при добавлении ограничений.

wayne r 23.04.2022 18:58

Другие вопросы по теме