login
A274481
Column 0 of triangle A274480.
2
1, 1, 6, 201, 43668, 66109077, 734489285949, 62046990518394987, 40856017343540753635650, 213541017770966830430102394165, 8983171252819461663303882556431558933, 3075323479836540410788167824905924319292059454, 8645250567095449548452511767536965844811633035624249353, 201074029866479927772743140580731863000103296624613890712276689597
OFFSET
0,3
LINKS
PROG
(PARI) {T(n, k)=local(M=Mat(1), L, R); for(i=1, n,
L=sum(j=1, #M, -(M^0-M)^j/j); M=sum(j=0, #L, (L/3^(#L-1))^j/j!); R=matrix(#M+1, #M+1, r, c,
if(r>=c, if(r<=#M, M[r, c], 3^((c-1)*(#M+1-c))))); M=R^(3^(#M-1)) ); M[n+1, k+1]}
for(n=0, 20, print1(T(n, 0), ", "))
CROSSREFS
Cf. A274480.
Sequence in context: A112845 A373238 A109058 * A256799 A003743 A115491
KEYWORD
nonn
AUTHOR
Paul D. Hanna, Jun 24 2016
STATUS
approved