the amazing Professor Ripley
Thursday August 2, 2007
From Ben Bolker on the R-devel list:
x = readLines(“http://developer.r-project.org/R.svnlog.2007″)
rx = x[grep("^r",x)]
who = gsub(” “,”",sapply(strsplit(rx,”\\|”),”[",2))
twho = table(who)
twho["ripley"]/sum(twho)
74% of all commits!



Amazing indeed. However, some recent reviewers of my papers would not be happy with that figure until you put a p-value next to it.