diff options
Diffstat (limited to 'R Scripts/analyze-cascades.R')
| -rwxr-xr-x | R Scripts/analyze-cascades.R | 1 |
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) |