Comment remodeler des matrices dans Mathematica

Question

Lors de la manipulation de matrices, il est souvent pratique de changer leur forme. Par exemple, pour transformer une N x M matrice de taille dans un vecteur de longueur NX M. Dans un Matlab Reshape fonction existe:

RESHAPE (X, M, N) retourne la matrice M par N dont les éléments sont pris dans la colonne à partir de X. Une erreur se produit si X n'a ​​pas d'éléments M * N.

Dans le cas d'une conversion entre une matrice et un vecteur je peux utiliser la fonction Mathematica Platten qui tire avantage de la représentation de liste imbriquée de Mathematica pour les matrices. A titre d'exemple rapide, supposons que j'ai une matrice X:

Avec Aplatir [X] Je peux obtenir le vecteur {1,2,3, ..., 16}. Mais ce qui serait bien plus utile est quelque chose de semblable à l'application Reshape de Matlab (X, 2,8) qui se traduirait par la matrice suivante:

Cela permettrait la création de matrices arbitraires tant que les dimensions sont égales à N * M. Pour autant que je sache, il n'y a rien de construit dans lequel je me demande si quelqu'un n'a pas codé une fonction Reshape de leur choix.

Answer 1

Reshape[mtx_, _, n_] := Partition[Flatten[mtx], n] 

Answer 2

Je sais que c'est un vieux fil, mais pour le bien des archives et recherches Google J'ai une façon plus générale qui permet une longueur m * n * ... liste pour être transformé en un m * n * ... tableau:

Reshape[list_, shape__] := Module[{i = 1}, 
    NestWhile[Partition[#, shape[[i]]] &, list, ++i <= Length[shape] &] 
    ] 

Par exemple:

In:= Reshape[Range[8], {2, 2, 2}] 

Out:= {{{1, 2}, {3, 4}}, {{5, 6}, {7, 8}}} 

Answer 3

Reshape[list_, dimensions_] := 
First[Fold[Partition[#1, #2] &, Flatten[list], Reverse[dimensions]]] 

Exemple d'utilisation:

In: Reshape[{1,2,3,4,5,6},{2,3}] 

Out: {{1,2,3},{4,5,6}} 

Cela fonctionne avec des tableaux de profondeur arbitraire.

Answer 4

ArrayReshape fait exactement cela.

Answer 5

Il existe maintenant une nouvelle fonction ArrayReshape [].

Exemple:

{{1, 2, 3}, {4, 5, 6}} // MatrixForm 

ArrayReshape[{{1, 2, 3}, {4, 5, 6}}, {3, 2}] // MatrixForm