cumSumGroup: Grouped cumulative sums

In kjetilroysland/ahw: Re-weighting marked point processes based on additive hazard models

Description

Computes cumulative sums for each set of consecutively identical group levels.

Usage

cumSumGroup(x, group)

Arguments

x	Vector with doubles that should be cumulatively summed.
group	Vector with integers that identify group levels.

Details

Assumes that all entries, affiliated to a particular group level, are consecutive.

Author(s)

Kjetil Røysland <[e-mail]>

See Also

ave

Examples

##---- Should be DIRECTLY executable !! ----
##-- ==>  Define data, use random,
##--	or do  help(data=index)  for the standard data sets.

## The function is currently defined as
function (x, group) 
{
    if (length(x) != length(group)) 
        stop("Length of x and group differs")
    r <- .C("cumSumGroup", w = as.double(x), as.integer(length(x)), 
        as.integer(group))
    return(r$w)
  }

kjetilroysland/ahw documentation built on May 20, 2019, 10:25 a.m.