Description Usage Arguments Author(s) See Also Examples
View source: R/writeNetworkModel.R
Based on the parameters given to a network, the code for each node is generated and all of the node models are pasted into a single JAGS model script.
1 | writeNetworkModel(network, pretty = FALSE)
|
network |
an object of class |
pretty |
Logical. When |
Jarrod Dalton and Benjamin Nutter
writeJagsModel
, writeJagsFormula
1 2 3 4 5 6 7 8 9 10 11 12 13 14 | data(PE, package='HydeNet')
Net <- HydeNetwork(~ wells +
pe | wells +
d.dimer | pregnant*pe +
angio | pe +
treat | d.dimer*angio +
death | pe*treat,
data = PE)
#* Default printing
writeNetworkModel(Net)
#* Something a little easier on the eyes.
writeNetworkModel(Net, pretty=TRUE)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.