[Rd] [PATCH] show vector length in summary()

[Sam Steingold]

> * Michael Weylandt <zvpunry.jrlynaqg at tznvy.pbz> [2013-09-10 22:45:00 -0400]:
>
> On Sep 10, 2013, at 18:38, Simon Urbanek <simon.urbanek at r-project.org> wrote:
>
>> 
>> On Sep 10, 2013, at 12:56 PM, Sam Steingold wrote:
>> 
>>>> * Dirk Eddelbuettel <rqq at qrovna.bet> [2013-09-10 10:21:33 -0500]:
>>>> 
>>>> On 10 September 2013 at 10:32, Sam Steingold wrote:
>>>> | (summary.default): show the vector length in addition to quantiles
>>>> | 
>>>> | 
>>>> | diff -u -i -p -F '^(def' -b -w -B /home/sds/src/R-3.0.1/src/library/base/R/summary.R.old /home/sds/src/R-3.0.1/src/library/base/R/summary.R
>>>> | --- /home/sds/src/R-3.0.1/src/library/base/R/summary.R.old    2013-03-05 18:02:33.000000000 -0500
>>>> | +++ /home/sds/src/R-3.0.1/src/library/base/R/summary.R    2013-09-10 10:19:02.682946339 -0400
>>>> | @@ -39,6 +39,7 @@ summary.default <-
>>>> |      qq <- stats::quantile(object)
>>>> |      qq <- signif(c(qq[1L:3L], mean(object), qq[4L:5L]), digits)
>>>> |      names(qq) <- c("Min.", "1st Qu.", "Median", "Mean", "3rd Qu.", "Max.")
>>>> | +  qq <- c(qq,"Length" = length(object))
>>>> |      if(any(nas))
>>>> |          c(qq, "NA's" = sum(nas))
>>>> |      else qq
>>>> | 
>>>> | Diff finished.  Tue Sep 10 10:19:40 2013
>
> http://cran.r-project.org/doc/FAQ/R-FAQ.html#How-should-I-write-summary-methods_003f

Yes, I have seen this, thanks for the reminder.
In fact, I have some summary methods in my codebase.
However, adding 46 lines of summary.default to my file just to add one
line is no good.

-- 
Sam Steingold (http://sds.podval.org/) on Ubuntu 13.04 (raring) X 11.0.11303000
http://www.childpsy.net/ http://thereligionofpeace.com http://jihadwatch.org
http://camera.org http://palestinefacts.org http://americancensorship.org
A professor is someone who talks in someone else's sleep.