rle

Hitung panjang dan nilai proses dengan nilai yang sama dalam sebuah vektor -- atau operasi sebaliknya.

Syntax

R Copy

rle(x)
inverse.rle(x, &#8230;)<p></p><p># S3 method for rle
print(x, digits = getOption("digits"), prefix = "", &#8230;)</p>

Arguments

Parameter	Deskripsi
x	a vector (atomic, not a list) for rle(); an object of class "rle" for inverse.rle().
…	further arguments; ignored here.
digits	number of significant digits for printing, see print.default.
prefix	character string, prepended to each printed line.

Return Value

rle() mengembalikan objek kelas "rle" yang merupakan daftar dengan komponen: panjang dan vektor bilangan bulat yang berisi panjang setiap proses. nilaisebuah vektor dengan panjang yang sama dengan panjang dengan nilai yang sesuai. inverse.rle() mengembalikan vektor atom.

Details

'vektor' digunakan dalam arti is.vector. Nilai yang hilang dianggap tidak sama dengan nilai sebelumnya, meskipun nilai tersebut juga hilang. inverse.rle() adalah fungsi kebalikan dari rle(), yang merekonstruksi x dari proses.

Contoh

Example

R Copy

# NOT RUN {
x <- rev(rep(6:10, 1:5))
rle(x)
## lengths [1:5]  5 4 3 2 1
## values  [1:5] 10 9 8 7 6

z <- c(TRUE, TRUE, FALSE, FALSE, TRUE, FALSE, TRUE, TRUE, TRUE)
rle(z)
rle(as.character(z))
print(rle(z), prefix = "..| ")

N <- integer(0)
stopifnot(x == inverse.rle(rle(x)),
          identical(N, inverse.rle(rle(N))),
          z == inverse.rle(rle(z)))
# }