arules (version 0.2-6)

itemCoding: Item Coding -- Handling Item Labels and Column IDs Conversions

Description

Provides the generic functions and the S4 methods for converting item labels into column IDs used in the binary matrix representation and vice versa.

decode converts from the numeric (column IDs) representation to readable item labels. decode is used by LIST.

encode converts from readable item labels to an itemMatrix using a given coding. With this method it is possible to create several compatible itemMatrix objects (i.e., use the same binary representation for items) from data.

recode recodes an itemMatrix object so its coding is compatible with another object.

Usage

decode(x, code, ...)
encode(x, code, ...)
## S3 method for class 'list':
encode(x, code, itemMatrix = TRUE)
## S3 method for class 'character':
encode(x, code, itemMatrix = TRUE)
## S3 method for class 'numeric':
encode(x, code, itemMatrix = TRUE)
recode(x, code, ...)
## S3 method for class 'itemMatrix':
recode(x, code = NULL, match = NULL, \ldots)

Arguments

x

a vector or a list of vectors of character strings (for encode) or of numeric (for decode), or an object of class itemMatrix (for recode).

code

a vector of character strings used for coding where the position of an item label in the vector gives the item's column ID. The used code can be obtained from itemMatrix, transactions and assoc

itemMatrix

return an object of class itemMatrix.

match

an itemMatrix object whose coding x should match.

...

further arguments.

Value

• recode always returns an object of class itemMatrix. For encode with itemMatrix = TRUE an object of class itemMatrix is returned. Otherwise the result is of the same type as x, e.g., a list or a vector.

See Also

LIST, associations-class, itemMatrix-class

Examples

data("Adult")

### Example 1: Manual decoding
### get code
code <- itemLabels(Adult)
head(code)

### get undecoded list and decode in a second step
list <- LIST(Adult[1:5], decode = FALSE)
list

decode(list, code = code)

### Example 2: Manually create an itemMatrix 
data <- list(
    c("income=small", "age=Young"),
    c("income=large", "age=Middle-aged")
    )

iM <- encode(data, code)
iM

inspect(iM)

### use the itemMatrix to create transactions
as(iM, "transactions")


### Example 3: use recode
### select first 100 transactions and all education-related items
sub <- Adult[1:100, "education"]
itemLabels(sub)
image(sub)

### recode to match Adult again
sub.recoded <- recode(sub, match = Adult)
image(sub.recoded)