genlatex {deal} | R Documentation |
The networks in a network family is arranged as pictex-graphs in a LaTeX-table.
genlatex(nwl,outdir="pic/",prefix="scoretable",picdir="",picpre="pic", ncol=5,nrow=7,width=12/ncol,vadjust=-1.8) genpicfile (nwl,outdir="pic/",prefix="pic",w=1.6,h=1.6,bigscale=3)
nwl |
object of class networkfamily containing a list of
objects of class network . |
outdir |
character string, the directory for storing output. |
prefix |
character string, the filename (without extension) of the LaTeX file. The filenames of the picfiles begin with the given prefix. |
picdir |
character string, the directory where pic-files are stored. |
picpre |
character string, prefix for pic-files. |
ncol |
integer, the number of columns in LaTeX table. |
nrow |
integer, the number of rows in LaTeX table. |
width |
numeric, the width of each cell in the LaTeX table. |
vadjust |
numeric, the vertical adjustment in LaTeX table. |
w |
numeric, the width of pictex objects |
h |
numeric, the height of pictex objects |
bigscale |
numeric, the scaling of the best network, which is output in 'nice.tex' |
Files:
{outdir}{picpre}xx.tex |
one pictex file for each network in the network family, indexed by xx. |
{outdir}{prefix}.tex |
LaTeX file with table including all pictex files. |
{outdir}{picpre}nice.tex |
pictex file with the best network. |
Susanne Gammelgaard Bøttcher alma@math.aau.dk,
Claus Dethlefsen aas.claus.dethlefsen@nja.dk.
data(rats) allrats <- getnetwork(networkfamily(rats,network(rats))) allrats <- nwfsort(allrats) ## Not run: dir.create("c:/temp") ## Not run: genpicfile(allrats,outdir="c:/temp/pic/") ## Not run: genlatex(allrats,outdir="c:/temp/pic/",picdir="c:/temp/pic/") ## LATEX FILE: #\documentclass{article} #\usepackage{array,pictex} #\begin{document} #\input{scoretable} #\input{picnice} #\end{document} data(ksl) ksl.nw <- network(ksl) ksl.prior <- jointprior(ksl.nw,64) mybanlist <- matrix(c(5,5,6,6,7,7,9, 8,9,8,9,8,9,8),ncol=2) banlist(ksl.nw) <- mybanlist ksl.nw <- getnetwork(learn(ksl.nw,ksl,ksl.prior)) ksl.search <- autosearch(ksl.nw,ksl,ksl.prior, trace=TRUE) ksl.searchlist <- makenw(ksl.search$table,ksl.search$nw) ksl.searchlist <- nwfsort(ksl.searchlist) ## Not run: genpicfile(ksl.searchlist) ## Not run: genlatex(ksl.searchlist)