Ben Bolker wrote:
> 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!
And 99% of all 'This is not a bug/You have not read the posting guide'
messages!
Which is a good thing.
Barry