On Thu, Nov 22, 2012 at 4:01 AM, Sam Steingold <s...@gnu.org> wrote: > Hi, > >> * arun <fznegcvax...@lnubb.pbz> [2012-11-21 14:04:36 -0800]: >> >> Are you looking for some other function (difftime2string) >> ot just remove the quotes from the printed output? > > I am wondering what others do when they want to see a summary of difftime. > >> If it is the latter, then this should do it. >> res<-do.call(data.frame,lapply(s,difftime2string)) >> names(res)<-names(s) >> res >> # Min. 1st Qu. Median Mean 3rd Qu. Max. >> #1 500.00 ms 17.12 min 99.48 min 8.30 hrs 8.05 hrs 6.98 days > > cool, thanks. > I now think that what I want is > --8<---------------cut here---------------start------------->8--- > difftime.summary <- function (v) { > s <- summary(as.numeric(v)) > r <- as.data.frame(sapply(s,difftime2string),stringsAsFactors=FALSE) > names(r) <- c("string") > r[[units(v)]] <- s > r > }
Any reason not summary.difftime to get S3 dispatch? MW >> difftime.summary(infl$delay) > string secs > Min. 500.00 ms 0.5 > 1st Qu. 17.12 min 1027.0 > Median 99.48 min 5969.0 > Mean 8.30 hrs 29870.0 > 3rd Qu. 8.05 hrs 28970.0 > Max. 6.98 days 603100.0 > --8<---------------cut here---------------end--------------->8--- > > > -- > Sam Steingold (http://sds.podval.org/) on Ubuntu 12.04 (precise) X > 11.0.11103000 > http://www.childpsy.net/ http://ffii.org http://jihadwatch.org > http://memri.org > http://www.memritv.org http://camera.org http://mideasttruth.com > A computer scientist is someone who fixes things that aren't broken. > > ______________________________________________ > R-help@r-project.org mailing list > https://stat.ethz.ch/mailman/listinfo/r-help > PLEASE do read the posting guide http://www.R-project.org/posting-guide.html > and provide commented, minimal, self-contained, reproducible code. ______________________________________________ R-help@r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.