#+TITLE: Worg stats
#+AUTHOR: Eric Schulte

#+source: commit-counts
#+begin_src sh
  cd /home/guerry/install/git/Worg/
  git log --raw --pretty=short |git shortlog -s
  cd /home/guerry/org/homepage/
#+end_src                                                                                                                                                               

#+source: 5-or-more
#+begin_src emacs-lisp :var cc=commit-counts
  (remove-if (lambda (el) (< (car el) 5)) cc)
#+end_src                                                                                                                                                               

#+source: sorted
#+begin_src emacs-lisp :var cc=5-or-more
  (sort cc (lambda (a b) (> (car a) (car b))))
#+end_src                                                                                                                                                               

#+source: histogram
#+begin_src gnuplot :var data=sorted :file worg-histogram.png :exports both
  set title "Worg Authors"
  set auto x
  set style data histogram
  set style fill solid border -1
  set boxwidth .9
  set xlabel "Author"
  set ylabel "Number of Commits"
  set xtics border in scale 1,0.5 nomirror rotate by -45  offset character 0, 0, 0
  plot "$data" using 1:xtic(2) notitle                                                                                                                                  
#+end_src