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