gpt4 book ai didi

r - 如何使用 R 中的 bnlearn 增加贝叶斯网络图中文本的大小

转载 作者:行者123 更新时间:2023-12-02 03:42:09 25 4
gpt4 key购买 nike

我正在尝试使用 bnlearn 在 R 中绘制 Bsyesian 网络。这是我的 R 代码

library(bnlearn)
library(Rgraphviz)

first_variable <- rnorm(100)
second_variable <- rnorm(100)
third_variable <- rnorm(100)
v <- data.frame(first_variable,second_variable,third_variable)

b <- hc(v)
hlight <- list(nodes = nodes(b), arcs = arcs(b),col = "grey", textCol = "red")
pp <- graphviz.plot(b, highlight = hlight)

上面的代码可以工作,但是图中文本的大小比我预期的要小得多。这是:

enter image description here

我认为这是因为我的变量名称很长。在我的真实数据中,变量名称甚至更长。这是我的真实数据集的 BN 图:

enter image description here

有什么办法可以增加图中文本的大小吗?

最佳答案

这基本上在帖子here中得到了回答(尽管这不是OP唯一的问题)。

建议的两种方法是全局更改文本大小:

par(cex=0.05)
graphviz.plot(res, highlight =
list(nodes=nodes(res), fill="lightgreen", col="black"))

但我发现这不起作用。

或者(这就是我一直在做的)是单独更改节点特征:

g <- Rgraphviz::layoutGraph(bnlearn::as.graphNEL(b))
graph::nodeRenderInfo(g) <- list(fontsize=20)
Rgraphviz::renderGraph(g)

关于r - 如何使用 R 中的 bnlearn 增加贝叶斯网络图中文本的大小,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/42934447/

25 4 0
Copyright 2021 - 2024 cfsdn All Rights Reserved 蜀ICP备2022000587号
广告合作:1813099741@qq.com 6ren.com