[FORGED] Re: Using apply

s2 <- apply(x*x, 2, sum)
s2

[1]  55 330

<SNIP>

It seems to me to be more "natural" (and perhaps more amenable to 
generalisation) to do:

     s2 <- apply(x,2,function(v){sum(v^2)})

But it's probably just a matter of taste.

cheers,

Rolf

Technical Editor ANZJS
Department of Statistics
University of Auckland
Phone: +64-9-373-7599 ext. 88276