R-alpha: apply()

[Thomas Lumley]

On Fri, 22 Aug 1997, Kurt Hornik wrote:

> The following is identical in R and S, but still strange ...
> 
> R> apply(matrix(1:20, nc = 4), 1, table)
>      [,1] [,2] [,3] [,4] [,5]
> [1,]    1    1    1    1    1
> [2,]    1    1    1    1    1
> [3,]    1    1    1    1    1
> [4,]    1    1    1    1    1
> R> apply(matrix(rep(1, 20), nc = 4), 1, table)
> [1] 4 4 4 4 4

Yes it is.  This is the sort of thing I meant when I complained about
drop=F being the default.  

The third example should be documented in the man page, which only
describes what happens "If each call to FUN returns a vector of length n" 
In fact the Blue Book help pages and the current S-PLUS help also
ignore this possibility.


Thomas Lumley
------------------------------------------------------+------
Biostatistics		: "Never attribute to malice what  :
Uni of Washington	:  can be adequately explained by  :
Box 357232		:  incompetence" - Hanlon's Razor  :
Seattle WA 98195-7232	:				   :
------------------------------------------------------------


=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
r-devel mailing list -- Read http://www.ci.tuwien.ac.at/~hornik/R/R-FAQ.html
Send "info", "help", or "[un]subscribe"
(in the "body", not the subject !)  To: r-devel-request@stat.math.ethz.ch
=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-