Получить имена списка в цикл

Question

В PHP вы можете получить доступ к обоим имена и значения массива в цикле с

foreach ($array as $key => $value) { 

Есть ли что-нибудь сравнимой в R, когда цикл над именованными списками?

Answer 1

Использование фиктивный данных и глупый надуманный пример

ll <- list(A = 1:10, B = LETTERS[1:10], C = letters[1:10]) 

Вы можете lapply() по индексам элементов ll:

out <- lapply(seq_along(ll), 
      function(ind, list, names) { 
       paste(names[ind], "=", paste(list[[ind]], collapse = ", ")) 
      }, list = ll, names = names(ll)) 

R> out 
[[1]] 
[1] "A = 1, 2, 3, 4, 5, 6, 7, 8, 9, 10" 

[[2]] 
[1] "B = A, B, C, D, E, F, G, H, I, J" 

[[3]] 
[1] "C = a, b, c, d, e, f, g, h, i, j" 

или for() цикл по списку:

ll2 <- vector("list", length(ll)) 
nams <- names(ll) 
for(i in seq_along(ll)) { 
    ll2[[i]] <- paste(nams[i], "=", paste(ll[[i]], collapse = ", ")) 
} 
ll2 

R> ll2 
[[1]] 
[1] "A = 1, 2, 3, 4, 5, 6, 7, 8, 9, 10" 

[[2]] 
[1] "B = A, B, C, D, E, F, G, H, I, J" 

[[3]] 
[1] "C = a, b, c, d, e, f, g, h, i, j" 

Answer 2

Чтобы получить имена lis t вы просто используете names(list).

ll <- list(A = 1:10, B = LETTERS[1:10], C = letters[1:10]) 
names(ll) 
#[1] "A" "B" "C" 

Большинство * применяются функции будут возвращать значения, которые соответствующим образом названы, если список был назван, чтобы начать с.

sapply(ll, max) 
# A B C 
#"10" "J" "j"