# NOT RUN {
library(network)
net <- network.initialize(5)
net[1,] <-1
net[2,3] <-2
export.dot(net,file="testNet.dot")
# clean up file afterwords (just for testing)
file.remove("testNet.dot")
# }
Run the code above in your browser using DataLab