## Not run:
# data(bm, package="PANR")
# pan<-new("PAN", bm1=bm1)
# pan<-infer(pan, para=list(type="SNR", log=TRUE, sign=TRUE, cutoff=log(5)),
# filter=FALSE, verbose=TRUE)
# data(Bakal2007Cluster, package="PANR")
# pan<-buildPAN(pan, engine="igraph", para=list(nodeColor=nodeColor,
# hideNeg=TRUE), verbose=TRUE)
# exportPAN(pan, file="pan", what="graph", format="ncol")
# ## End(Not run)
Run the code above in your browser using DataLab