ArgumentCheck error in setNode()
Closed this issue · 1 comments
jarrod-dalton commented
Looks like something may be going on with the changes made which implement the ArgumentCheck package. I started stepping through the Decision Networks vignette and got the below error:
> net <- HydeNetwork(~ initialAces | card1*card2
+ + initialPoints | card1*card2
+ + highUpcard | dealerUpcard
+ + hit1 | initialPoints*highUpcard
+ + acesAfterCard3 | initialAces*card3
+ + pointsAfterCard3 | card1*card2*card3*acesAfterCard3
+ + hit2 | pointsAfterCard3*highUpcard
+ + acesAfterCard4 | acesAfterCard3*card4
+ + pointsAfterCard4 | card1*card2*card3*card4*acesAfterCard4
+ + hit3 | pointsAfterCard4*highUpcard
+ + acesAfterCard5 | acesAfterCard4*card5
+ + pointsAfterCard5 | card1*card2*card3*card4*card5*acesAfterCard5
+ + playerFinalPoints | initialPoints*hit1*pointsAfterCard3
+ *hit2*pointsAfterCard4*hit3*pointsAfterCard5
+ + dealerOutcome | dealerUpcard
+ + payoff | playerFinalPoints*dealerOutcome)
> plot(net)
> cardProbs <- c(rep(1/13,8), 4/13, 1/13) # probs. for 2, 3, ..., 9, (10-K), A
>
> net <- setNode(net, card1, nodeType="dcat", pi=vectorProbs(p=cardProbs, card1))
Error: 'addMessage' is not an exported object from 'namespace:ArgumentCheck'
jarrod-dalton commented
Duh. If I actually used the up-to-date version of ArgumentCheck, it works.