Find Co-occurrence Between Dummy Codes

Usage

cm_combine.dummy(cm.l2d.obj, combine.code, rm.var = "time", overlap = TRUE)

Arguments

cm.l2d.obj

An object from cm_long2dummy.

combine.code

A list of named character vectors of at least two code column names to combine

rm.var

Name of the repeated measures column. Default is "time".

overlap

logical, integer or character of binary operator + integer. If TRUE finds the overlap. If FALSE finds anywhere any of the codes occur. If integer finds that exact combination of overlaps. If character must be a logical vector c(>, <, =<, =>, ==, !=) followed by an integer and wrapped with quotes.

Examples

## <strong>Not run</strong>: 
# foo <- list(
#     AA = qcv(terms="1:10"),
#     BB = qcv(terms="1:2, 3:10, 19"),
#     CC = qcv(terms="1:3, 5:6")
# )
# 
# foo2  <- list(
#     AA = qcv(terms="4:8"),
#     BB = qcv(terms="1:4, 10:12"),
#     CC = qcv(terms="1, 11, 15:20"),
#     DD = qcv(terms="")
# )
# 
# 
# (x <- cm_range2long(foo))
# (D1 <- cm_long2dummy(x))
# 
# (z <- cm_range2long(foo, foo2, v.name="time"))
# (D2 <- cm_long2dummy(z, "time"))
# cm_combine.dummy(D1, combine.code = list(AB=qcv(AA, BB)))
# cm_combine.dummy(D1, combine.code = list(AB=qcv(AA, BB)), overlap="==1")
# cm_combine.dummy(D1, combine.code = list(AB=qcv(AA, BB)), overlap="!=1")
# D1 <- cm_combine.dummy(D1, combine.code = list(AB=qcv(AA, BB)), overlap=0)
# D1 <- cm_combine.dummy(D1, combine.code = list(CAB=qcv(AB, CC)), overlap=FALSE)
# 
# combines <- list(AB=qcv(AA, BB), ABC=qcv(AA, BB, CC))
# cm_combine.dummy(D1, combine.code = combines)
# cm_combine.dummy(D2, combine.code = combines)
# ## <strong>End(Not run)</strong>

See also