Re: [R] printing difftime summary

2012-11-26 Thread Sam Steingold
e, TIBCO Software > wdunlap tibco.com > > >> -Original Message- >> From: Sam Steingold [mailto:sam.steing...@gmail.com] On Behalf Of Sam >> Steingold >> Sent: Monday, November 26, 2012 4:09 PM >> To: William Dunlap >> Cc: r-help@r-project.

Re: [R] printing difftime summary

2012-11-26 Thread William Dunlap
. :1 Min. :2012-11-26 Min.Med.Max: 1 days... 4 days...16 days > > 1st Qu.:2 1st Qu.:2012-11-27 > > Median :3 Median :2012-11-28 > > Mean :3 Mean :2012-11-28 > > 3rd Qu.:4 3rd Qu.:2012-11-29 > > Max. :5 Max. :2012-11-30 > >> s

Re: [R] printing difftime summary

2012-11-26 Thread Sam Steingold
; needed, as format.difftime does a reasonable job (except that it does not copy > the input names to its output). I put it in to show how it gets called. > > > Bill Dunlap > Spotfire, TIBCO Software > wdunlap tibco.com > > >> -Original Message- >> From: r

Re: [R] printing difftime summary

2012-11-26 Thread William Dunlap
boun...@r-project.org] On > Behalf > Of Sam Steingold > Sent: Monday, November 26, 2012 2:20 PM > To: r-help@r-project.org; David Winsemius > Subject: Re: [R] printing difftime summary > > > * David Winsemius [2012-11-26 08:46:35 -0800]: > > > > On Nov 26, 2012, at

Re: [R] printing difftime summary

2012-11-26 Thread Sam Steingold
> * David Winsemius [2012-11-26 08:46:35 -0800]: > > On Nov 26, 2012, at 7:14 AM, Sam Steingold wrote: > >> summary(infl), where infl$delay is a difftime vector, prints >> >> ... >> >>delay >> string:c("492.00 ms", "18.08 min", "1.77 hrs", "8.20 hrs", "8.13 hrs", >> "6.98 days") >> secs :c("

Re: [R] printing difftime summary

2012-11-26 Thread R. Michael Weylandt
On Mon, Nov 26, 2012 at 4:46 PM, David Winsemius wrote: > > On Nov 26, 2012, at 7:14 AM, Sam Steingold wrote: > >> this overcomes the summary generation, but not printing: >> >> --8<---cut here---start->8--- >> summary.difftime <- function (v, ...) { >> s <- su

Re: [R] printing difftime summary

2012-11-26 Thread David Winsemius
On Nov 26, 2012, at 7:14 AM, Sam Steingold wrote: this overcomes the summary generation, but not printing: --8<---cut here---start->8--- summary.difftime <- function (v, ...) { s <- summary(as.numeric(v), ...) r <- as.data.frame(sapply(s,difftime2string),s

Re: [R] printing difftime summary

2012-11-26 Thread Sam Steingold
this overcomes the summary generation, but not printing: --8<---cut here---start->8--- summary.difftime <- function (v, ...) { s <- summary(as.numeric(v), ...) r <- as.data.frame(sapply(s,difftime2string),stringsAsFactors=FALSE) names(r) <- c("string") r

Re: [R] printing difftime summary

2012-11-25 Thread David Winsemius
On Nov 24, 2012, at 7:48 PM, Sam Steingold wrote: * David Winsemius [2012-11-23 13:14:17 -0800]: See http://cran.r-project.org/doc/FAQ/R-FAQ.html#How-should-I-write-summary-methods_003f --8<---cut here---start->8--- summary.difftime <- function (v) {

Re: [R] printing difftime summary

2012-11-24 Thread Sam Steingold
> * David Winsemius [2012-11-23 13:14:17 -0800]: > >>> See >>> http://cran.r-project.org/doc/FAQ/R-FAQ.html#How-should-I-write-summary-methods_003f --8<---cut here---start->8--- summary.difftime <- function (v) { s <- summary(as.numeric(v)) r <- as.data.fr

Re: [R] printing difftime summary

2012-11-23 Thread David Winsemius
On Nov 23, 2012, at 12:35 PM, Sam Steingold wrote: * R. Michael Weylandt [2012-11-23 09:13:36 +]: 2. because difftime.summary returns a data.frame and not a "Classes 'summaryDefault', 'table'" as I assume summary must return. See http://cran.r-project.org/doc/FAQ/R-FAQ.html#How-shou

Re: [R] printing difftime summary

2012-11-23 Thread Sam Steingold
> * R. Michael Weylandt [2012-11-23 09:13:36 > +]: > >> 2. because difftime.summary returns a data.frame and not a >> "Classes 'summaryDefault', 'table'" as I assume summary must return. > > See > http://cran.r-project.org/doc/FAQ/R-FAQ.html#How-should-I-write-summary-methods_003f what are

Re: [R] printing difftime summary

2012-11-23 Thread R. Michael Weylandt
On Thu, Nov 22, 2012 at 5:49 PM, Sam Steingold wrote: >> * R. Michael Weylandt [2012-11-22 12:11:55 >> +]: >> >>> I now think that what I want is >>> --8<---cut here---start->8--- >>> difftime.summary <- function (v) { >>> s <- summary(as.numeric(v)) >>>

Re: [R] printing difftime summary

2012-11-22 Thread Sam Steingold
> * R. Michael Weylandt [2012-11-22 12:11:55 > +]: > >> 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),stringsAsFactor

Re: [R] printing difftime summary

2012-11-22 Thread R. Michael Weylandt
On Thu, Nov 22, 2012 at 4:01 AM, Sam Steingold wrote: > Hi, > >> * arun [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.

Re: [R] printing difftime summary

2012-11-21 Thread Sam Steingold
Hi, > * arun [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(d

Re: [R] printing difftime summary

2012-11-21 Thread arun
  Mean  3rd Qu.  Max. #1 500.00 ms 17.12 min 99.48 min 8.30 hrs 8.05 hrs 6.98 days A.K. - Original Message - From: Sam Steingold To: r-help@r-project.org Cc: Sent: Wednesday, November 21, 2012 2:22 PM Subject: [R] printing difftime summary Hi, I have a vector of difftime objects

[R] printing difftime summary

2012-11-21 Thread Sam Steingold
Hi, I have a vector of difftime objects and I want to see its summary. Alas: --8<---cut here---start->8--- > summary(infl$delay) LengthClass Mode 9008386 difftime numeric --8<---cut here---end--->8--- this is almo