Код R для программного создания диаграммы Consort с использованием DiagrammeR?

Спрашивал ранее на stackoverflow 5 лет назад. В ответах используется пакет диаграмма: создание дерева диаграмма для отображения количества обращений с использованием R

Google нашел немного графического кода: http://blogs.sas.com/content/graphicallyspeaking/2016/10/20/outside-box-consort-diagram/

RStudio может напрямую просматривать файлы Graphviz .dot:

https://blog.rstudio.org/2015/05/01/rstudio-v0-99-preview-graphviz-and-diagrammer/

Альтернативно,

library(DiagrammeR)
consort <- file("consort.dot")
grViz(diagram = consort)
close(consort)

"consort.dot" следует:

digraph g {
start [shape = box, label = "CONSORT Graph"];
node0 [shape = box, label = "All Patients\nN=1000"];
node1 [shape = box, label = "Full Analysis Set\nN=800"];
node2 [shape = box, label = "Excluded\nN=100"];
node3 [shape = box, label = "Not Included\nN=100"];
node4 [shape = box, label = "Safety Set\nN=700"];
node5 [shape = box, label = "Not Dosed\nN=100"];
node6 [shape = box, label = "Treatment A\nN=200"];
node7 [shape = box, label = "Treatment B\nN=150"];
node8 [shape = box, label = "Treatment C\nN=200"];
node9 [shape = box, label = "Treatment D\nN=150"];
start -> node0 -> node1 -> node4 -> {node6 node7 node8 node9};
node0 -> node2;
node0 -> node3;
node1 -> node5;
}