r - 如何在R中自定义Hasse图？

Question

研究论文的偏序哈斯图。希望从 hasseDiagram 包中自定义 hasse() 函数的输出，但不确定如何。我已经看了一下引擎盖，但不清楚我可以在哪里设置参数来驱动：

1. 标签颜色
2. 箭头大小和形状

有任何想法吗？

例子：

library("hasseDiagram")
test_data <- generateRandomData(20, 3, 0.5)
hasse(test_data)