Как добавить текст размера выборки в шестнадцатеричный график facet_wraped
Я пытаюсь добавить общее количество наблюдений к моему шестнадцатеричному графику, который был огранен с помощью facet_wrap. Но я либо получаю номер образца для каждого бина, либо не могу разместить текст на графике из-за макета.
Я пытался использовать group_by() и tally() из пакета dplyr, чтобы найти значения, но не смог их построить.
ggplot(data = chris.sale.total, aes(x = px, y = pz)) +
geom_hex() +
coord_fixed() +
strike.zone +
home.plate +
scale_fill_viridis() +
facet_wrap(~outcome) +
theme_grey()
Стоит ли изучать PHP в 2023-2024 годах?
Привет всем, сегодня я хочу высказать свои соображения по поводу вопроса, который я уже много раз получал в своем сообществе: "Стоит ли изучать PHP в...
Поведение ключевого слова "this" в стрелочной функции в сравнении с нормальной функцией
В JavaScript одним из самых запутанных понятий является поведение ключевого слова "this" в стрелочной и обычной функциях.
Приемы CSS-макетирования - floats и Flexbox
Здравствуйте, друзья-студенты! Готовы совершенствовать свои навыки веб-дизайна? Сегодня в нашем путешествии мы рассмотрим приемы CSS-верстки - в...
Тестирование функциональных ngrx-эффектов в Angular 16 с помощью Jest
В системе управления состояниями ngrx, совместимой с Angular 16, появились функциональные эффекты. Это здорово и делает код определенно легче для...
Концепция локализации и ее применение в приложениях React ⚡️
Локализация - это процесс адаптации приложения к различным языкам и культурным требованиям. Это позволяет пользователям получить опыт, соответствующий...
Пользовательский скаляр GraphQL
Листовые узлы системы типов GraphQL называются скалярами. Достигнув скалярного типа, невозможно спуститься дальше по иерархии типов. Скалярный тип...
0
1
177
1
Перейти к ответу
Данный вопрос помечен как решенный
Ответы 1
Ответ принят как подходящий
Используя group_by и tally создайте новый data.frame.
Затем добавьте geom_label к вашему графику.
chris.sale.tally <- chris.sale.total %>% group_by(outcome) %>% tally()
ggplot(data = chris.sale.total, aes(x = px, y = pz)) +
geom_hex() +
coord_fixed() +
strike.zone +
home.plate +
geom_label(aes(label=paste('n=', n)), x=-4.25, y=5, vjust=0, hjust=0, data=chris.sale.tally) +
scale_fill_viridis() +
facet_wrap(~outcome) +
theme_grey()
Другие вопросы по теме
Ggplot выдает ошибку «метка не найдена», в то время как «метка» явно присутствует
Добавьте частоты на карту ggplot (используя rgdal)
Gganimate различные масштабы заливки в слоях изображения
Как построить график выплат опциона R
Различные цвета линий в выводе лесного участка из пакета sjPlot R
Установка фиксированного масштаба для отдельных графических серий на ggplot2/ggmap
Сделайте график, используя один столбец в качестве начала, а другой - в качестве остановки для ящиков
Создать коробчатую диаграмму с годовыми столбцами из непрерывных данных даты с заполнением
Точечная диаграмма по всем группам для длинного фрейма данных
Сортировать столбцы с категориальными переменными по числовым переменным в гистограмме с накоплением
Похожие вопросы
Условное увеличение
Ggplot выдает ошибку «метка не найдена», в то время как «метка» явно присутствует
Невозможно использовать команду gs_new() для экспорта фрейма данных в googlesheets
"Вернуть" одну горячую кодировку
Как я могу получить список фреймов данных на основе шаблона в середине имени фрейма данных?
Как экспортировать xtable в формате PDF напрямую через скрипт R?
Удалить символы, которые повторяются более двух раз в строке
R: Как создать несколько последовательных месяцев
Как расширить фрейм данных от суммированных до одиночных наблюдений
Значения фрейма данных получают целочисленные значения вместо текста
Что, если вы добавите количество наблюдений к граням? Например, вот так:
chris.sale.total <- chris.sale.total %>% group_by(outcome) %>% mutate(outcome_observation = paste0(outcome," - ", n()," observations"))и затем используйтеfacet_wrap(outcome_observation)