Error when calling posterior about structmcmc

[rjbgoudie]

This works for me, except install_github() didn't seem to install all required dependencies. Would you be able to try the following?

install.packages("devtools")
library(devtools)

install.packages(c("bit", "fastmatch", "gRain", "zoo"))
install_github("rjbgoudie/parental", dependencies  = TRUE)
install_github("rjbgoudie/structmcmc", dependencies  = TRUE)
library(structmcmc)

# Setup data frame
x1 <- factor(c("a", "a", "g", "c", "c", "a", "g", "a", "a"))
x2 <- factor(c(2, 2, 4, 3, 1, 4, 4, 4, 1))
x3 <- factor(c(FALSE, FALSE, TRUE, FALSE, TRUE, TRUE, FALSE, FALSE, TRUE))
x <- data.frame(x1 = x1, x2 = x2, x3 = x3)

# Draw samples from the posterior using MC^3.
set.seed(1234)
initial <- bn(c(), c(), c())
priorgraph <- bn(c(), c(1), c(2))
prior <- priorGraph(priorgraph, 0.5)
mcmc <- posterior(data = x, method = "mc3", prior = prior,
                  nSamples = 10000, nBurnin = 1000, initial = initial)

[sempwn]

@rjbgoudie Thanks so much! All working now.