2010-09-27 15 views

उत्तर

16

कोई अंतर्निहित समारोह है, लेकिन यह Fold और Partition के संयोजन के साथ बहुत आसान है:

In[47]:= x1 = RandomReal[{0, 1}, {3, 4, 5}]; 

In[48]:= dims = Dimensions[x1] 

Out[48]= {3, 4, 5} 

In[49]:= x2 = Fold[Partition, Flatten[x1], Most[Reverse[dims]]]; 

In[50]:= x1 == x2 

Out[50]= True 
2

शायद आप Partition[] या उसके रिश्तेदारों में से एक चाहते हैं।