Annotate relative-selection-probabilities graph

svn:r17762

diff --git a/doc/design-paper/node-selection/plot-node-selection.R b/doc/design-paper/node-selection/plot-node-selection.R
index 3559c5381f6afde18d14d1af94c754817fdb252c..b302e6a6ef8e641d9b4bb82a2b83fcda4be44bf7 100644 (file)
--- a/doc/design-paper/node-selection/plot-node-selection.R
+++ b/doc/design-paper/node-selection/plot-node-selection.R
@@ -52,5 +52,12 @@ lines(t1$bw, t3$prob-o, col=col[3], type="b")
 lines(t1$bw, t4$prob-o, col=col[4], type="b")
 lines(t1$bw, t5$prob-o, col=col[5], type="b")
 lines(t1$bw, tt$prob-o,col=col[8], type="b")
+
+lines(range(t1$bw), rep(0,2), lty=2)
+
 title(main="Selection probabilility compared to Tor")
+x <- rep(8111.669, 4)
+y <- c(1.396915e-02, 4.962766e-03, 1.635106e-03, 7.446809e-06)
+par(xpd=TRUE)
+text(x,y,c("50%", "75%", "90%", ">99%"), adj=c(0,0.5))
 dev.off()