login
A132873
Column 1 of triangle A132870 (first 30 terms only).
5
1, 4, 45, 1432, 101725, 12938076, 2559100705, 721024536688, 272966047708329, 133221961930843000, 81267877305115964881, 60493579458078813579864, 53901953276076347752558885, 56594161930292786377035193022, 69104546575462679469462451015875, 97044923170365199810426927635301216
OFFSET
0,2
COMMENTS
Triangle T = A132870 obeys: the g.f. of row n of T^n = (y + n^2)^n for n >= 0.
LINKS
PROG
(PARI) {a(n)=local(M=Mat([1, 0; 1, 1]), N, L); for(i=1, n, N=M; M=matrix(#N+1, #N+1, r, c, if(r>=c, if(r<=#N, (N^(#N))[r, c], polcoeff((x+(#M)^2)^(#M), c-1)))); L=sum(i=1, #M, -(M^0-M)^i/i); M=sum(i=0, #M, (L/#N)^i/i!); ); M[n+2, 2]}
CROSSREFS
KEYWORD
nonn,fini,full
AUTHOR
Paul D. Hanna, Sep 29 2007
EXTENSIONS
b-file with non-integral entries deleted by N. J. A. Sloane, Mar 02 2018
STATUS
approved