part: Intersection and symmetric differences of two sets

In gmonette/spida15: Collection of miscellaneous functions for mixed models etc. prepared for SPIDA 2009+ (development version)

Usage

part(A, B)

Arguments

A
B

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 (A, B) 
{
    if (is.factor(A)) 
        A <- as.character(A)
    if (is.factor(B)) 
        B <- as.character(B)
    ret <- list(`A and B` = intersect(A, B), `A - B` = setdiff(A, 
        B), `B - A` = setdiff(B, A))
    attr(ret, "N") <- sapply(ret, length)
    ret
  }

gmonette/spida15 documentation built on May 17, 2019, 7:26 a.m.