Description Usage Arguments Value Note See Also Examples
View source: R/cm_code.transform.R
Transform co-occurrences and/or combinations of codes into a new code(s).
1 2 3 4 5 6 7 | cm_code.transform(
x2long.obj,
overlap.code.list = NULL,
combine.code.list = NULL,
exclude.code.list = NULL,
rm.var = NULL
)
|
x2long.obj |
An object from |
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. |
Returns a dataframe with overlapping, combined occurrences, and/or exclusion of supplied overlapping codes added.
The code column must be named "code"
and your start and end
columns must be named "start"
and "end"
.
cm_range2long
,
cm_time2long
,
cm_df2long
,
cm_code.blank
,
cm_code.combine
,
cm_code.exclude
,
cm_code.overlap
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 | ## Not run:
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))
)
## End(Not run)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.