Re: [R] navel-gazing

2010-09-17 Thread Joshua Wiley
I have been tinkering around with this for a bit, and I am proud to share navel gazer 1.0. If no arguments are passed, it will look up the top 50 authors on the r-help list, for the given month in the given year. You can also specify one or more months as a character vector (e.g., August or

[R] navel-gazing

2010-08-17 Thread Ben Bolker
month - 2010-August list - r-help ##list - r-sig-ecology ##list - r-sig-mixed-models ## month - 2010q3 n - 50 baseurl - https://stat.ethz.ch/pipermail/; library(RCurl) z - getURL(paste(baseurl,list,/,month,/author.html,sep=)) zz - strsplit(z,LI)[[1]] namefun - function(x) {

Re: [R] navel-gazing

2010-08-17 Thread Henrique Dallazuanna
Ben, I change the line: z - getURL(paste(baseurl,list,/, month,/author.html,sep=)) to z - getURL(paste(baseurl,list,/, month,/author.html,sep=), ssl.verifypeer = FALSE) because don't work for me. Nice! On Tue, Aug 17, 2010 at 1:47 PM, Ben Bolker bbol...@gmail.com wrote: month -

Re: [R] navel-gazing

2010-08-17 Thread Brian Diggs
Since Peter Dalgaard is splitting his considerable contributions between Peter Dalgaard and peter dalgaard, I made the following changes (which shouldn't be a problem unless e e cummings becomes a regular poster): # from base::chartr documentation capwords - function(s, strict = FALSE) {

Re: [R] navel-gazing

2010-08-17 Thread Henrique Dallazuanna
I think that gsub example on help page is more clear: library(XML) # could be used the XML package to get the names cnames - gsub('\n', '', head(tail(sapply(getNodeSet(htmlParse(z, asText = TRUE), //i), xmlValue), -3), -3)) gsub((\\w)(\\w*), \\U\\1\\L\\2, cnames, perl=TRUE) On Tue, Aug 17,