Вы можете сделать это, используя опцию graphviz
.
Например, вы можете получить базовые позиции узлов графика, используя
library(DiagrammeR)
grViz("
digraph flow {
D -> E;
{rank=same ; A -> B -> C -> D};
{rank=same ; F -> E[dir=back]};
}
")
И вы можете добавить несколько атрибутовчтобы подтвердить его
grViz('
digraph flow {
# set characteristics
node[shape=square,
height=1,
color=skyblue,
penwidth=2,
fillcolor=lavender,
style=filled,
fontsize=25,
fontcolor=grey46,
fontname = "helvetica" # this may be OS dependent
];
edge[minlen=2,
color=grey,
penwidth=2
];
nodesep=0.5; #hack
A[label=Start];
# Graph
D -> E;
{rank=same ; A -> B -> C -> D};
{rank=same ; F -> E[dir=back]};
}
')
, который производит
![enter image description here](https://i.stack.imgur.com/Zd1EE.png)