drawnetwork
allows the user to specify a Bayesian network through a point and click interface.drawnetwork(nw,df,prior,trylist=vector("list",nw$n),
unitscale=20,cexscale=8,
arrowlength=.25,nocalc=FALSE,
yr=c(0,350),xr=yr,...)
inspectprob(nw,unitscale=20,cexscale=8,
arrowlength=.25,xr=c(0,350),yr=xr,...)
network
to be edited.network
.jointprior
.maketrylist
.plot.network
. Measures the scaled size of text and symbols.plot.network
. Measures the length of the edges of the arrowheads.TRUE
, no learning procedure is called, see eg. simulation
.plot.network
. Scale parameter for chopping off arrow heads.plot.network
.network
with the final network.maketrylist
.banlist
. It is a matrix with two
columns. Each row is the 'from' node index and the 'to' node index,
where the indices are the column number in the data frame.
Note that the network score changes as the network is re-learned
whenever a change is made (unless nocalc
is TRUE
).
inspectprob
draws the network and makes it possible to inspect
the prob
properties of the nodes by clicking on them. The result
is shown in the output window.network
data(rats)
rats.nw <- network(rats)
rats.prior <- jointprior(rats.nw,12)
rats.nw <- learn(rats.nw,rats,rats.prior)$nw
newrat <- drawnetwork(rats.nw,rats,rats.prior)$nw
Run the code above in your browser using DataLab