lengths

R Base 3.6.2 🇮🇩 Bahasa Indonesia

Dapatkan panjang setiap elemen daftar atau vektor atom (is.atomic) sebagai vektor bilangan bulat atau numerik.

Syntax

lengths(x, use.names = TRUE)

Arguments

Parameter	Deskripsi
`x`	a list, list-like such as an expression or an atomic vector (for which the result is trivial).
`use.names`	logical indicating if the result should inherit the names from x.

Return Value

Bilangan bulat non-negatif dengan panjang length(x), kecuali jika elemen apa pun memiliki panjang lebih dari elemen \(2^{31}-1\), saat elemen tersebut mengembalikan vektor ganda. Jika use.names benar, nama diambil dari nama di x, jika ada.

Details

Fungsi ini mengulang x dan mengembalikan vektor kompatibel yang berisi panjang setiap elemen dalam x. Secara efektif, length(x[[i]]) dipanggil untuk semua i, sehingga metode apa pun pada length akan dipertimbangkan.

Contoh

Example

# NOT RUN {
require(stats)
## summarize by month
l <- split(airquality$Ozone, airquality$Month)
avgOz <- lapply(l, mean, na.rm=TRUE)
## merge result
airquality$avgOz <- rep(unlist(avgOz, use.names=FALSE), lengths(l))
## but this is safer and cleaner, but can be slower
airquality$avgOz <- unsplit(avgOz, airquality$Month)

## should always be true, except when a length does not fit in 32 bits
stopifnot(identical(lengths(l), vapply(l, length, integer(1L))))

## empty lists are not a problem
x <- list()
stopifnot(identical(lengths(x), integer()))

## nor are "list-like" expressions:
lengths(expression(u, v, 1+ 0:9))

## and we should dispatch to length methods
f <- c(rep(1, 3), rep(2, 6), 3)
dates <- split(as.POSIXlt(Sys.time() + 1:10), f)
stopifnot(identical(lengths(dates), vapply(dates, length, integer(1L))))
# }