%I #4 Mar 30 2012 18:36:50

%S 1,2,7,46,595,16444,1048303,162728110,63746277967,64594795730680,

%T 172419318632651104,1229463017642626881490,23684690483668583872503679,

%U 1244115601652916934000237966330,179585081405174505374545193721101377

%N Row sums of triangle A111840, which shifts columns left and up under matrix cube.

%o (PARI) {a(n,q=3)=local(A=Mat(1),B);if(n<0,0, for(m=1,n+2,B=matrix(m,m);for(i=1,m, for(j=1,i, if(j==i,B[i,j]=1,if(j==1,B[i,j]=(A^q)[i-1,1], B[i,j]=(A^q)[i-1,j-1]));));A=B); return(sum(k=0,n,A[n+1,k+1])))}

%Y Cf. A111840, A078125 (variant).

%K nonn

%O 0,2

%A _Paul D. Hanna_, Aug 23 2005