|
| |
|
|
A087074
|
|
For n > 0, 0 <= k <= n^2, T(n,k) is the number of rotationally and reflectively distinct n X n arrays that contain the numbers 1 through k once each and n^2-k zeros.
|
|
3
| |
|
|
1, 1, 1, 1, 2, 3, 3, 1, 3, 12, 66, 378, 1890, 7560, 22680, 45360, 45360, 1, 3, 33, 426, 5466, 65520, 720720, 7207200, 64864800, 518918400, 3632428800, 21794572800, 108972864000, 435891456000, 1307674368000, 2615348736000, 2615348736000, 1
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,5
|
|
|
LINKS
| Eric Weisstein's World of Mathematics, Array
|
|
|
FORMULA
| T(n, k) = 1/8*([n^2]_k+2*[n]_k+5*[0]_k) if n is even and 1/8*([n^2]_k+4*[n]_k+3*[1]_k) if n is odd, where [m]_k=m*(m-1)*...*(m-k+1), k>0, [m]_0=1, is falling factorial. - Vladeta Jovovic (vladeta(AT)eunet.rs), Aug 10 2003
|
|
|
EXAMPLE
| 1,1; 1,1,2,3,3; 1,3,12,66,378,1890,7560,22680,45360,45360; ...
There is a single distinct 3 X 3 matrix containing all zeros, so a(3,1)=1.
There are 3 distinct 3 X 3 matrices containing a 1 and otherwise 0's, so a(3,2)=3.
There are 12 distinct 3 X 3 matrices containing a single 1, a single 2 and otherwise 0's, so a(3,3)=12.
There is a single distinct 3 X 3 matrix containing all zeros, so a(3, 0) = 1.
There are 3 distinct 3 X 3 matrices containing 8 0's and a 1, so a(3, 1) = 3.
There are 12 distinct 3 X 3 matrices containing a single 1, a single 2 and otherwise 0's, so a(3, 2) = 12.
|
|
|
MATHEMATICA
| (For 3 X 3 case) CanonicalizeArray[ x_ ] := Module[ {r, t}, Sort[ {x, Reverse[ x ], r=Reverse/@x, Reverse[ r ], t=Transpose[ x ], Reverse[ t ], r=Reverse/@t, Reverse[ r ]} ][ [ 1 ] ] ] ADD[ n_, d_ ] := Union[ CanonicalizeArray /@ (Partition[ #, n ] & /@ Permutations[ Join[ Range[ d ], Table[ 0, {n^2 - d} ] ] ]) ]
|
|
|
CROSSREFS
| Cf. A086829, A085698.
Sequence in context: A181608 A109199 A172528 * A136453 A114104 A076780
Adjacent sequences: A087071 A087072 A087073 * A087075 A087076 A087077
|
|
|
KEYWORD
| nonn,tabf
|
|
|
AUTHOR
| Zakir Seidov (zakseidov(AT)yahoo.com) and Eric Weisstein (eric(AT)weisstein.com), Aug 08, 2003
|
|
|
EXTENSIONS
| More terms from David Wasserman (wasserma(AT)spawar.navy.mil), Apr 12 2005
|
| |
|
|
