R gRain包错误

Question

我正在使用gRain包创建一个贝叶斯网络。以下是我从示例中尝试的代码：

data("cad1")
cad.dag <- dag(~ CAD:Smoker:Inherit:Hyperchol + AngPec:CAD + Heartfail:CAD + QWave:CAD)
cad.cpt <- extractCPT(cad1, cad.dag, smooth = 0.1)

最后一行抛出错误：

"Error in nw$nodes : $ operator not defined for this S4 class". 

有人可以帮忙吗？

更新：由于与bnlearn软件包混淆，似乎发生了此问题。现在整理好了。

Answer 1

由于与bnlearn包冲突，似乎已经发生此问题。现在整理好了。