r - 在美人鱼图中侧向融合箭头
问题描述
如何在 R 顺序美人鱼图中添加横向融合箭头?在下面的示例中:
library(DiagrammeR)
mermaid("
graph TB
A[GE Solution]-->C{1:1}
B[GA Solution]-->C{1:1}
C{1:1}-->D[Stir 10 mins at 500 r/min]
D[Stir 10 mins at 500 r/min]-->E[Homogenisation at 10000 r/min]
")
我怎么能产生如下的东西?
解决方案
我玩过mermaid
,但我不确定是否有功能,它看起来像是一个简单的文档解决方案,而不是一个具有很大灵活性的解决方案。但是,您可以使用 graphViz 制作相同的图表:
library(DiagrammeR)
grViz("digraph dot {
node [shape=rectange];
d1 [shape=point,width=0.01,height=0.01];
{'GE Solution', 'GA Solution'}->d1[dir=none];
d1->'Stir 10 mins at 500 r/min';
'Stir 10 mins at 500 r/min'->'Homogenisation at 10000 r/min'}")
编辑以回复评论:使用子图并对不可见的点(d2
在本例中)和您希望使其与其水平相同的节点(此处40oC
)进行排名。
grViz("digraph dot {
node [shape=rectange];
d1 [shape=point,width=0.01,height=0.01];
d2 [shape=point, width=0.01, height=0.01];
{'GE Solution', 'GA Solution'}->d1[dir=none];
d1->'Stir 10 mins at 500 r/min';
'Stir 10 mins at 500 r/min'->d2[dir=none];
subgraph {
rank=same;
d2; '40oC';
}
d2->'40oC'[dir=none];
d2->'Homogenisation at 10000 r/min'}")