R 节点之间具有多条边的修改sankey图

我想在R中制作一个修改过的sankey图，其中节点之间可能有多条边，以标识不同的路径。这有点难以解释，所以我在ppt中制作了示例图片：）

我知道这很难看：）但我的观点是，我希望能够对A和B1之间的边进行修改，并清楚地指出哪个边属于通向C1和C2的路径

我尝试了rCharts包中的sankeyPlot，但是我只能得到两列节点

---

我也尝试过riverplot软件包，但在这里我无法在相同节点之间创建两条边

您可以将DiagrammeR与graphviz graph和HTML表格标签一起使用：

library(DiagrammeR)

g1 <- 
'digraph structs {
    B1_node [label=<
      <TABLE BORDER="0" CELLBORDER="1" CELLSPACING="0">
        <TR><TD PORT="One">B One</TD></TR>
        <TR><TD PORT="Two">B Two</TD></TR>
      </TABLE>
      > ];

    A -> B1_node:One;
    A -> B1_node:Two;
    A -> B2;
    B1_node:One -> C1;
    B1_node:Two -> C2;
    B2 -> C3;

    rankdir=LR
}'

grViz(g1)

库（图解程序）
g1谢谢，我想我会使用sankey版本，然后可能会使用illustrator制作成一个节点：）
links <- data.frame(
  source = c("A", "A", "B1",   "B1", "A",    "B1a", "B1b", "B2" ),
  target =c("B1", "B1", "B1a", "B1b", "B2",  "C1", "C2", "C3"),
  value = c(20, 20, 20, 20, 30, 20, 20, 30)
)