summaryrefslogtreecommitdiffstats
path: root/R Scripts/analyze-cascades.R
diff options
context:
space:
mode:
authorBen Green <bgreen@g.harvard.edu>2015-10-04 17:18:05 -0400
committerBen Green <bgreen@g.harvard.edu>2015-10-04 17:18:05 -0400
commit75868035a6e363c2ad67ff0342440aff3972a970 (patch)
tree5bf65d9f3d5fa47dda8c1695ce34aa24e0f811dd /R Scripts/analyze-cascades.R
parent3969a594c49e58aafe04ff352b02d0d61eb228cf (diff)
downloadcriminal_cascades-75868035a6e363c2ad67ff0342440aff3972a970.tar.gz
..
Diffstat (limited to 'R Scripts/analyze-cascades.R')
-rwxr-xr-xR Scripts/analyze-cascades.R1
1 files changed, 1 insertions, 0 deletions
diff --git a/R Scripts/analyze-cascades.R b/R Scripts/analyze-cascades.R
index 8bbb598..affd77a 100755
--- a/R Scripts/analyze-cascades.R
+++ b/R Scripts/analyze-cascades.R
@@ -17,6 +17,7 @@ plot(sizes,counts,log='xy',pch=20,col='#1f78b4',xaxt='n',yaxt='n',
axis(1,at=c(1,5,10,50,100,500),cex.axis=0.6)
axis(2,at=c(1,10,100,1000),cex.axis=0.6)
+mean(rep(sizes,counts))
sizes_pl = displ$new(counts[counts>1])
est = estimate_xmin(sizes_pl)
sizes_pl$setXmin(est)