powered by
net(add = FALSE, col = gray(0.7), border = "black", lwd = 1, LIM = c(-1, -1, +1, +1))
net(FALSE, col=rgb(.8,.7,.7) ,border='blue' )
Run the code above in your browser using DataLab