Exclude Codes

Usage

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

Arguments

x2long.obj
An object from cm_range2long, cm_time2long or cm_df2long.
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.

Exclude Codes

Value

Returns a dataframe with n codes excluding the nth code.

Description

Find the occurrences of n codes excluding the nth code. For example you have times/words coded for a teacher and you also have times/words coded for happiness. You can find all the happiness times excluding the teacher times or vice versa.

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="") # ) # # # (x <- cm_range2long(foo)) # (z <- cm_range2long(foo, foo2, v.name="time")) # cm_code.exclude(x, list(ABnoC=qcv(AA, BB, CC))) # cm_code.exclude(z, list(ABnoC=qcv(AA, BB, CC)), rm.var="time") # excludes <- list(AnoB=qcv(AA, BB), ABnoC=qcv(AA, BB, CC)) # (a <- cm_code.exclude(z, excludes, rm.var="time")) # plot(a) # # #WITH cm_time2long # x <- list( # transcript_time_span = qcv(00:00 - 1:12:00), # A = qcv(terms = "2.40: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, 17.01") # ) # # y <- list( # transcript_time_span = qcv(00:00 - 1:12:00), # A = qcv(terms = "2.40: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, 17.01") # ) # # dat <- cm_time2long(x, y) # head(dat, 10) # cm_code.exclude(dat, list(P=qcv(A, B), Q=qcv(B, C), R=qcv(A, B, C)), # rm.var = "variable") # ## <strong>End(Not run)</strong>

See also

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