与交易的因果关系（贝叶斯网络）

Question

我正在使用多个二元向量，例如A，B，C，D，E，F，G，H。 我想找到它们之间的分类。我尝试过以下方法：

 log_data<-read.csv(choose.files(), as.is = T, header = T, blank.lines.skip = TRUE)
 data<-log_data[2:ncol(log_data)]
 data
 TIME  A B C D E F G
 1     1 1 1 0 1 0 1 1
 2     0 0 1 1 1 1 0 1
 3     1 1 1 1 1 0 1 1
 4     1 0 1 1 1 1 0 1
 .....................
 fit <- network(data)
 fit.prior <- jointprior(fit)
 fit <- getnetwork(learn(fit,rats,fit.prior))
 **Error in postc0c(node$condposterior[[1]]$mu, node$condposterior[[1]]$tau,  : 
 NA/NaN/Inf in foreign function call (arg 1)**

获取此错误只是因为所有都是连续变量而在mu处是NULL。

创建网络后如何进行分类？