convertir une matrice à une liste

Question

Supposons que j'ai une matrice foo comme suit:

foo <- cbind(c(1,2,3), c(15,16,17)) 

> foo 
    [,1] [,2] 
[1,] 1 15 
[2,] 2 16 
[3,] 3 17 

Je voudrais en faire une liste qui ressemble à

[[1]] 
[1] 1 15 

[[2]] 
[1] 2 16 

[[3]] 
[1] 3 17 

Vous pouvez le faire en suit:

lapply(apply(foo, 1, function(x) list(c(x[1], x[2]))), function(y) unlist(y))

Je suis intéressé par un Altern méthode active qui n'est pas aussi compliquée. Notez, si vous faites juste apply(foo, 1, function(x) list(c(x[1], x[2]))), il renvoie une liste dans une liste, que j'espère éviter.

Answer 1

est ici une solution plus propre:

as.list(data.frame(t(foo))) 

Cela profite du fait qu'une trame de données est vraiment juste une liste de vecteurs de longueur égale (alors qu'une matrice est vraiment un vecteur qui est affiché avec des colonnes et des lignes ... vous pouvez le voir en appelant foo [5], par exemple).

Vous pouvez aussi le faire, bien qu'il ne soit pas beaucoup d'une amélioration:

lapply(1:nrow(foo), function(i) foo[i,]) 

Answer 2

library(plyr) 
alply(foo, 1)