如何在 R 中绘制混合图？

我用过这个但不起作用（在 bnlearn 中，他将“弧”称为有向边，将“边”称为无向边）：

library(bnlearn)
dag=empty.graph(nodes = c("E", "F"))
graphviz.plot(dag)
dag = set.edge(dag, from = "E", to = "F")
dag = set.arc(dag, to = "E", from = "F")
graphviz.plot(dag)

如文档https://www.bnlearn.com/documentation/man/arcops.html中所述，它将覆盖弧...（请注意，在 bnlearn 库中，他将“弧”称为有向边，将“边”称为无向边）

我希望能够绘制一个混合图，例如：

（E和F之间的弧（有向边），同时也是边（无向边））。

（如果 R 做不到，我可以使用其他简单的工具吗？我的目标只是绘图）

编辑：我刚刚意识到贝叶斯网络在定义上需要是无环的，所以我想我对 bnlearn 库毫无希望......