Specify Higher-Dimensional Banded Structures
Mathematica 6 provides a powerful symbolic language for specifying arbitrary slices and bands in higher-dimensional arrays.
In[1]:=  |  Graphics3D[
Cuboid /@
Position[Normal[
SparseArray[
Band[{1, 1, 1}, Automatic, {2, 3, 1}] -> Table[x, {10}, {10}]]],
x]] |
Out[1]=  |  |