使用 DiagrammeR 将一排节点放在另一排节点下方

Using DiagrammeR to place one rows of nodes below another

给出以下通过 DiagrammeR 包派生的流程图:

DiagrammeR::DiagrammeR(diagram =
                       "
                       graph LR;
                       A[Start]-->B;
                       B --> C;
                       C --> D;
                       D --> E;
                       E --> F;
                       ")

是否可以包装它 以便节点 E 在节点 [= 下面13=]和节点F如下图左侧:

您可以使用 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]};
  }
')

产生