\name{NodeVisStyle} \alias{NodeVisStyle} \alias{NodeVisStyle<-} \title{ Gets/sets the nodes visual appearence in Netica. } \description{ Netica internally has a number of styles it can use to draw a node, thes including, "Default", "Absent", "Shape", "LabeledBox", "BeliefBars", "BeliefLine", and "Meter". The function \code{NodeVisStyle()} returns how the node will be displayed, or sets how it will be displayed. } \usage{ NodeVisStyle(node) NodeVisStyle(node) <- value } %- maybe also 'usage' for other objects documented here. \arguments{ \item{node}{ A \code{\link{NeticaNode}} object whose style is to be determined. } \item{value}{ A character string giving the new style. Must be one of "Default", "Absent", "Shape", "LabeledBox", "BeliefBars", "BeliefLine", or "Meter". } } \details{ The visual style of the node doesn't make much different in RNetica, as R does not display the node. However, it will control the appearence when the node is loaded into the Netica GUI. } \value{ A character string which is one of the values "Default", "Absent", "Shape", "LabeledBox", "BeliefBars", "BeliefLine", or "Meter", or \code{NA} if an error occured. The setter method returns the modified \code{node} object. } \references{ \newcommand{\nref}{\href{http://norsys.com/onLineAPI/functions/#1.html}{#1()}} \url{http://norsys.com/onLineAPI/Manual/index.html}: \nref{GetNodeVisStyle_bn}, \nref{SetNodeVisStyle_bn}, } \author{ Russell Almond } \note{ The Netica documentation indicates that in the future additionl parameters can be added to the style, for example: "LabeledBox,CornerRoundingRadius=3,LineThickness=2" } \seealso{ \code{\link{NeticaNode}}, \code{\link{NodeVisPos}()} } \examples{ snet <- CreateNetwork("StylishNet") snode <- NewDiscreteNode(snet,"StyleMe") stopifnot(NodeVisStyle(snode)=="Default") NodeVisStyle(snode) <- "Meter" stopifnot(NodeVisStyle(snode)=="Meter") DeleteNetwork(snet) } \keyword{ interface } \keyword{ attribute }% __ONLY ONE__ keyword per line