Listes Mathematica Combinaison de coordonnées X, Y et Z

Question

Je suis un débutant dans Mathematica. Ma question est la suivante: J'ai énorme quantité de x, coordonnées y et z dans des listes distinctes nommées XCord, YCORD, ZCORD et je veux les combiner dans une liste

Exemple:
Si la x liste des co-oridinates est donnée par XCORD = {x1,x2,x3}, la liste des coordonnées y par YCORD = {y1,y2,y3} et la liste des coordonnées z par ZCORD = {z1,z2,z3}, je voudrais avoir une liste résultante des coordonnées qui ressemble à ceci:

{{x1,y1,z1},{x2,y2,z2},{x3,y3,z3}} 

Answer 1

Vous pouvez faire ceci avec Transpose:

XCORD = {x1, x2, x3}; 
YCORD = {y1, y2, y3}; 
ZCORD = {z1, z2, z3}; 

res = Transpose[{XCORD, YCORD, ZCORD}] 

==> {{x1, y1, z1}, {x2, y2, z2}, {x3, y3, z3}} 

Plus d'informations sur le travail avec les listes peuvent être trouvées here, et plus spécifique à votre question, here.

S'il vous plaît noter qu'il est préférable (bien que cela soit permis) de ne pas démarrer une variable de votre choix avec une lettre majuscule. Utiliser un début en minuscules de votre nom de variable signifie que vous ne serez jamais en conflit avec les milliers de symboles intégrés qui commencent tous par une lettre majuscule.

Answer 2

Autre solution en utilisant la fonction MapThread:

In[2]:= MapThread[List, {{x1, x2, x3}, {y1, y2, y3}, {z1, z2, z3}}] 

Out[2]= {{x1, y1, z1}, {x2, y2, z2}, {x3, y3, z3}} 

Pour les grandes listes, Transpose est un ordner d'une ampleur plus rapide, bien que:

In[3]:= With[{n=10^6}, x=RandomReal[1, n]; y=RandomReal[2, n]; z=RandomReal[3, n];] 

In[4]:= Transpose[{x, y, z}]; // Timing 

Out[4]= {0.644832, Null} 

In[5]:= MapThread[List, {x, y, z}]; // Timing 

Out[5]= {5.87969, Null}