oapply: Apply for ovariables
In OpasnetUtils: Opasnet Modelling Environment Utility Functions

Description Usage Arguments Details Value Author(s) Examples

Use tapply on the output slot

1
2
3

oapply(X, INDEX = NULL, FUN = NULL, cols = NULL, drop_na = TRUE, 
    use_aggregate = TRUE, ..., simplify = TRUE)
ooapply(X, cols, FUN = "sum", ...)

`X`	an `ovariable`
`INDEX`	list of factors, like `tapply`
`FUN`	function to apply, `ooapply` takes character input (Only "sum", "mean", "min", "max" and "prod" allowed.)
`cols`	names of columns to be removed (reverse INDEX)
`drop_na`	if `TRUE` removes NA from the result automatically
`use_aggregate`	if `TRUE` uses `aggregate` to perform apply, which is considerably faster with sparse variables
`...`	optional arguments to FUN
`simplify`	like `tapply`

See also: http://en.opasnet.org/

Returns an ovariable, with output slot tapplied and marginal adjusted accordingly. ooapply is a memory-saving variant of oapply when there is exactly one row for each unique combination. oapply with use_aggregate is fastest in most cases. Any extraneous columns are lost, as with tapply and aggregate.

T. Rintala teemu.rintala.a@gmail.com

a <- new("ovariable", name = "a", output = data.frame(A = c("a", "a", "b", "b"), 
    B = c("1", "2", "1", "2"), aResult = 1:4), marginal = c(TRUE, TRUE, FALSE))
oapply(a, FUN = sum, cols = "A")
oapply(a, a@output[c("A")], sum)