# NOT RUN {
data(geospiza)
nDt <- data.frame(a=rnorm(nNodes(geospiza)), b=1:nNodes(geospiza),
row.names=nodeId(geospiza, "internal"))
t1 <- addData(geospiza, node.data=nDt)
# }
Run the code above in your browser using DataLab