Обложка канала

R4marketing | канал Алексея Селезнёва | Язык R

Автор канала Алексей Селезнёв, руководитель отдела аналитики в Netpeak, автор R пакетов: ryandexdirect, rfacebookstat и др. В канале публикуются статьи, доклады, новости, заметки по языку R.

R4marketing | канал Алексея Селезнёва | Язык R

3 года назад
Открыть в
ggflowchart:<b> Создание блок-схем в R Пакет ggflowchart является надстройкой над ggplot2, которая позволяет с минимальным объёмом кода рисовать блок схемы, средствами одного чистого ggplot2 сделаьт это не так просто. Рисование блок схемы проходит в 2 этапа: 1. Сначала создать таблицу с описанием будущей блок схемы:
library(ggflowchart)

data <- tibble::tibble(from = c("A", "A", "A", "B", "C", "F"),
                       to = c("B", "C", "D", "E", "F", "G"))

2. С помощью функции ggflowchart() нарисовать саму блок-схему
ggflowchart(data)

Функция ggflowchart() так же имеет набор дополнительных аргументов: ● node_data - Необязательный фрейм данных, определяющий атрибуты узла, включая метки, которые должны отображаться в полях. ● fill - Цвет заливки блоков узлов. ● colour - Цвет контура блоков узлов. ● text_colour - Цвет текста в полях узла. ● text_size - Размер текста в полях узла. ● arrow_colour -Цвет стрелок между блоками узлов. ● arrow_size - Размер стрелок между блоками узлов. ● family - Семейство шрифтов текста в полях узла. ● x_nudge - Ширина блоков узлов. ●` y_nudge` - Высота блоков узлов. ● horizontal - Направление блок-схемы Преобразуем приведённую выше блок схему с помощью аргумента node_data:
node_data <- tibble::tibble(
  name = c("A", "B", "C", "D", "E", "F", "G"),
  type = c("Type 1", "Type 1", "Type 1", "Type 1", 
           "Type 2", "Type 2", "Type 2")
  )
ggflowchart(data, node_data, fill = type)

Результат можно увидеть на изображении к посту. Ссылки: - Примеры кода заимствованы из статьи "Introducing {ggflowchart}" #заметки_по_R