On Aug 4, 2010, at 11:06 AM, Charles C. Berry wrote:
On Wed, 4 Aug 2010, David Winsemius wrote:
Dear list;
I just created a utility function that replicates what I have done
in the past with Excel or OO.org by putting a formula of the form
=sum($A1:A$1) in an upper-corner of a section an
Just a little difference.
ecdf.tbl <- function (.dat) {
.dat <- as.matrix(.dat)
na.m <- is.na(.dat)
.dat[na.m]<-0 # Assign NA a value 0
res <- apply(t(apply(.dat,1,cumsum)),2,cumsum)
res[na.m] <- NA # Assign NA back
return(res)
}
-
On Wed, 4 Aug 2010, David Winsemius wrote:
Dear list;
I just created a utility function that replicates what I have done in the
past with Excel or OO.org by putting a formula of the form =sum($A1:A$1) in
an upper-corner of a section and then doing a "fill" procedure by dragging
the lower-rt
3 matches
Mail list logo
