A112916 Self-convolution of A088716, where a(n) = 2*A088716(n+1)/(n+2) for n>=0.

1, 2, 7, 34, 207, 1496, 12420, 115938, 1198831, 13582010, 167187547, 2221174504, 31675372612, 482628099144, 7825665501852, 134562607924194, 2446051941152127, 46873289933397206, 944492559814284397

Offset: 0

Author

Paul D. Hanna, Oct 06 2005

Keywords

• nonn

Crossrefs

Cf. A088716, A112915, A112911.

Programs

PARI

{a(n)=local(A=Mat(1),B);for(m=2,n+1,B=matrix(m,m);for(i=1,m, for(j=1,i, if(j==i,B[i,j]=1,B[i,j]=-j*(A^-1)[i-j,1]);));A=B); return(Vec(Ser(vector(n+1,i,(A^-1)[i,1]))^2)[n+1])}