Transform Codes

Usage

cm_code.transform(x2long.obj, overlap.code.list = NULL, combine.code.list = NULL, exclude.code.list = NULL, rm.var = NULL)

Arguments

x2long.obj
An object from cm_range2long, cm_time2long or cm_df2long.
overlap.code.list
A list of named character vectors of at least two code column names to aggregate co-occurrences.
combine.code.list
A list of named character vectors of at least two code column names to combine
exclude.code.list
A list of named character vectors of at least two code column names to compare and exclude. The last column name is the one that will be excluded.
rm.var
Name of the repeated measures column.

Transform Codes

Value

Returns a dataframe with overlapping, combined occurrences, and/or exclusion of supplied overlapping codes added.

Description

Transform co-occurrences and/or combinations of codes into a new code(s).

Note

The code column must be named "code" and your start and end columns must be named "start" and "end".

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="") # ) # # bar1 <- list( # transcript_time_span = qcv(00:00 - 1:12:00), # A = qcv(terms = "0.00:3.00, 5.01, 6.02:7.00, 9.00"), # B = qcv(terms = "2.40, 3.01:3.02, 5.01, 6.02:7.00, 9.00, # 1.12.00:1.19.01"), # C = qcv(terms = "2.40:3.00, 5.01, 6.02:7.00, 9.00, 16.25:17.01") # ) # # (x <- cm_range2long(foo)) # (z <- cm_range2long(foo, foo2, v.name="time")) # (dat <- cm_time2long(bar1)) # # cm_code.transform(x, # overlap.code.list = list(ABC=qcv(AA, BB, CC)), # combine.code.list = list(oABC=qcv(AA, BB, CC)), # exclude.code.list = list(ABnoC=qcv(AA, BB, CC)) # ) # # cm_code.transform(z, # overlap.code.list = list(ABC=qcv(AA, BB, CC)), # combine.code.list = list(oABC=qcv(AA, BB, CC)), # exclude.code.list = list(ABnoC=qcv(AA, BB, CC)), "time" # ) # # cm_code.transform(dat, # overlap.code.list = list(ABC=qcv(A, B, C)), # combine.code.list = list(oABC=qcv(A, B, C)), # exclude.code.list = list(ABnoC=qcv(A, B, C)) # ) # ## <strong>End(Not run)</strong>

See also

cm_range2long, cm_time2long, cm_df2long, cm_code.blank, cm_code.combine, cm_code.exclude, cm_code.overlap