Encode using run-length encoding

Encode using run-length encoding

Usage

encode(x, ...)

# S4 method for DataFrame
encode(x)

# S4 method for Ranges
encode(x)

Arguments

x

Object.

...

Additional arguments.

Value

Modified object. All atomic columns will be encoded to Rle S4 class.

Note

Updated 2021-06-09.

See also

Rle().

Examples

## DataFrame ====
binary <- seq(from = 0L, to = 1L)
object <- S4Vectors::DataFrame(
    "a" = rep(x = binary, times = 50L),
    "b" = rep(x = binary, each = 50L)
)
lapply(object, class)
#> $a
#> [1] "integer"
#> 
#> $b
#> [1] "integer"
#> 
object <- encode(object)
lapply(object, class)
#> $a
#> [1] "Rle"
#> attr(,"package")
#> [1] "S4Vectors"
#> 
#> $b
#> [1] "Rle"
#> attr(,"package")
#> [1] "S4Vectors"
#>