rle2: Run Length Encoding

In AkselA/R-ymse: Ymse (Various)

Description

Compute the lengths and values of runs of equal values in a vector

Usage

rle2(x, na.unique = FALSE, output = c("data.frame", "rle",
  "named vector", "lengths", "values"))

Arguments

x	a numeric or character vector
na.unique	should every NA be conidered unique?
output	what form of output

Value

Return value depends on output.

data.frame

A data.frame with lengths and values columns

rle

An object of class "rle"

named vector

A vector of lengths with values as names

lengths

The lengths as a single vector

values

The values as a single vector

Examples

x <- c(NA, NA, 1, 2, 3, 3, NA, NA, NA, 2, 2, 2, NA, 1, 1, NA, NA)
rle2(x)

m <- matrix(c(
  0.7, 0.2, 0.1,
  0.2, 0.6, 0.2,
  0.1, 0.2, 0.7
), 3, byrow=TRUE)

set.seed(1)
y <- LETTERS[markov_seq(n=100, m)]
rle2(y, out="named")


# Same result as rle
rle2(x, na.unique=TRUE, output="rle")
rle(x)

# inverse.rle works as long as output is "rle"
inverse.rle(rle2(x, output="rle"))

AkselA/R-ymse documentation built on March 21, 2020, 9:52 a.m.