🔥📈 Прожарка с помощью ИИ графиков из советских учебников

На этой неделе смотрели графики в советских учебниках (раз, два). Конечно, чтобы быть в тренде, т.к. теперь посты без упоминания ИИ просто никто не читает 😂🤖🙈, то делаем ИИ-прожарку графика, который воспроизвели в ggplot2.
Полный текст прожарки от двух LLM по ссылкам (раз и два). Как вам?

PS: если хочется получить доступ к моему приложению Roast My Graph, то напишите в личку — скину ссылку.

#AI #ИИ #графики #визуализация_данных #прожарка_графиков #советские_учебники

💻 Выполнение кода на R в браузере без установки IDE

В своих постах публикую код графиков на R. Если у вас не установлен R и IDE, то попробовать работу кода проблематично. Можно сделать так — вот ссылка на последний график. Нажмите кнопку "Run" (будьте терпеливы, требуется время для установки и загрузки пакетов) Удобно?

#R #ggplot2 #webr

#пятничное Идёт гроза, а я в валенках, и телефон дома забыла...🤣😂😅

⚪️ Датавиз на странице 404 — 2

Помните, писал о прикольной странице 404 у Datawrapper. На днях Cédric Scherer поделился у себя ещё примером от policyviz.com — за авторством Jonathan Schwabish :)

Мало кто уделяет внимание страницам 404.

#404error #dataviz

🇬🇧 Барчарт с флагами

У настенька и графики увидел приём создания барчарта через таблицу в Excel. Конечно, захотелось воспроизвести аналогичный в R, используя пакет ggflags, о котором писал ранее.

#R #ggplot2 #ggflags #барчарт #bar_plot

Код на R:

library(ggplot2)
library(dplyr)
library(ggflags)
library(forcats)

# Данные о городах
cities_data <- tibble(
  City = c("Bangkok", "Istanbul", "London", "Hong Kong", "Antalya", "Mecca", 
           "Dubai", "Macau", "Paris", "Kuala Lumpur"),
  Arrivals_M = c(32.4, 23, 21.7, 20.5, 19.3, 19.3, 18.2, 18, 17.4, 16.5),
  Country_Code = c("TH", "TR", "GB", "HK", "TR", "SA", "AE", "MO", "FR", "MY")
) %>%
  mutate(
    City = fct_reorder(City, Arrivals_M),
    Country_Code = tolower(Country_Code)
)

ggplot(cities_data, aes(x = Arrivals_M, y = City)) +
  geom_col(fill = "gray90", width = 0.8) +
  geom_flag(aes(x = -10, country = Country_Code), size = 8) +
  geom_text(aes(x = -8.5, label = City), hjust = 0, size = 4) +
  geom_text(aes(x = 0.25, label = Arrivals_M), hjust = 0, size = 4) +
  scale_x_continuous(limits = c(-11, 35), expand = c(0, 0)) +
  labs(
    title = "Most Visited Cities in the World",
    subtitle = "Arrivals, in M",
    x = NULL,
    y = NULL
  ) +
  theme_minimal(base_size = 14) +
  theme(
    plot.title.position = "plot",
    plot.caption.position = "plot",
    panel.grid = element_blank(),
    panel.grid.major.y = element_blank(),
    panel.grid.minor = element_blank(),
    axis.title = element_blank(),
    axis.text.y = element_blank(),
    axis.text.x = element_blank(),
    axis.ticks = element_blank(),
    plot.title = element_text(face = "bold"),
    plot.subtitle = element_text(size = 14, color = "gray40"),
    plot.margin = margin(10, 10, 10, 10)
  )

ggsave("most_visited_cities_ggflags.png", bg = "white", width = 6, height = 6, dpi = 300)

Гугл презентовали новый шрифт Google Sans Code для программистов. Как вам? Я попробовал в RStudio. Кириллицу не поддерживает. А какой шрифт вы используете в своей привычной IDE?

TidyTuesday. Sometimes messy

Rodrigo Barreiro создал небольшую веб-страницу с визуализациями социального проекта TidyTuesday.

В записях микро-блога он пошагово показывает, как создаются графики, начиная от преобразование данных до конечного результата на основе кода на R. Очень симпатичный проект.

📊 ggdiagram: Объектно-ориентированные диаграммы в R с помощью ggplot2

Хочу рассказать о крутом пакете ggdiagram для R, который позволяет создавать объектно-ориентированные диаграммы на базе ggplot2. Этот пакет вдохновлен возможностями TikZ, но адаптирован под удобство и гибкость R. Он построен на системе классов S7 и интегрируется с другими пакетами вроде ggtext, ggforce и ggarrow.

Что он позволяет делать? Вы можете определять визуальные объекты, такие как круги, прямоугольники или другие формы, размещать их относительно друг друга (например, справа, слева, сверху) и соединять стрелками или линиями. С пакетом ggdiagram вы можете рисовать диаграммы путей (path diagrams). Диаграммы путей используются для визуализации и анализа причинно-следственных связей между различными переменными (path analysis), позволяя исследователям выявлять, как независимые переменные влияют на результат, и насколько эти связи опосредованы другими факторами. Путевая модель, отображаемая на такой диаграмме, представляет собой графическое изображение этих отношений.

Вот простой пример кода, чтобы нарисовать круг и прямоугольник, соединенные стрелкой:

library(ggdiagram)
c1 <- ob_circle(radius = 1 / sqrt(pi))
r2 <- ob_rectangle() |>
place(from = c1,
where = "right",
sep = .5)
ggdiagram() +
c1 +
r2 +
connect(c1, r2, resect = 1)

Это создаст базовую диаграмму с кругом слева и прямоугольником справа, соединенными линией. Попробуйте сами и экспериментируйте!

#R #ggplot2 #ggdiagram #DataVisualization #path_analysis #SEM

The Art of Data Visualization with ggplot2 (The TidyTuesday Cookbook) 🌟

Nicola Rennie подвела небольшой итог трехлетней работы с данными в рамках еженедельного социального проекта TidyTuesday, цель которого — показать, как можно исследовать различные реальные наборы данных.

За три года еженедельных публикаций Nicola создала более 150 визуализаций данных. Каждая глава книги The Art of Data Visualization with ggplot2 посвящена отдельной визуализации данных, включая пояснения для каждого этапа творческого процесса: исследование данных, выбор типа визуализации данных, первоначальные идеи дизайна с набросками от руки, первое построение графика, итеративный процесс стилизации графиков.

Цель книги — продемонстрировать примеры сквозного процесса создания визуализаций данных, уделяя особое внимание техническим деталям их создания в R. Особенно нравится то, что процесс создания визуализации записывается как gif в библиотеке {camcorder}.

Просто кладезь идей для визуального вдохновения!