login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A110951
a(n) = permanent of an n X n matrix M of zeros and ones defined as follows: if we concatenate the rows of M to form a vector v of length n^2, v_i = 0 if i is a Fibonacci number and v_i = 1, otherwise.
0
0, 2, 10, 117, 1218, 8544, 102528, 1073328, 13174560, 167191920, 2194456320, 34592423040, 566748161280, 8894849241600, 159020867174400, 3016954215475200, 59837217568128000, 1189832713214745600
OFFSET
3,2
PROG
(PARI) a(n)={my(A=matrix(n, n, i, j, 1), m=2, f=0); while(m, my(qr=divrem(f, n)); A[qr[1]+1, qr[2]+1]=0; f=fibonacci(m); if(f>n^2, m=0, f--; m++)); matpermanent(A)} \\ Herman Jamke (hermanjamke(AT)fastmail.fm), May 14 2007
CROSSREFS
Cf. A000045.
Sequence in context: A347014 A356514 A006121 * A172477 A265942 A120597
KEYWORD
nonn
AUTHOR
Simone Severini, Sep 25 2005
EXTENSIONS
More terms from Herman Jamke (hermanjamke(AT)fastmail.fm), May 14 2007
STATUS
approved