powered by
plot.ergmm
pie=TRUE
ergmm.drawpie(center, radius, probs, n = 50, cols = 1:length(probs), ...)
plot(c(0,sum(1:11))*2,c(-10,10),type="n",asp=1) for(i in 1:10) ergmm.drawpie(c(sum(1:i)*2,0), radius=i, probs=1:(i+1))
Run the code above in your browser using DataLab