This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A188481 #23 Oct 20 2024 00:26:13 %S A188481 1,4,1,16,7,1,64,38,10,1,256,187,69,13,1,1024,874,406,109,16,1,4096, %T A188481 3958,2186,748,158,19,1,16384,17548,11124,4570,1240,216,22,1,65536, %U A188481 76627,54445,25879,8485,1909,283,25,1,262144,330818,259006,138917,52984,14471,2782,359,28,1 %N A188481 Riordan matrix (1/(1-4x),(1-sqrt(1-4x))/(2*sqrt(1-4x))). %C A188481 Row sums = A141223; %C A188481 Diagonal sums = A188482; %C A188481 Inverse matrix: (1/(1+2x)^2, x(1+x)/(1+2x)^2). %F A188481 T(n,k) = [x^n] ((1-sqrt(1-4*x))/(2*sqrt(1-4*x)))^k/(1-4*x). %F A188481 Recurrence: T(n+1,k+1) = T(n,k) + 3*T(n,k-1) + T(n,k-2) - T(n,k-3) + T(n,k-4) - T(n,k-5) + ... %e A188481 Triangle begins: %e A188481 1; %e A188481 4, 1; %e A188481 16, 7, 1; %e A188481 64, 38, 10, 1; %e A188481 256, 187, 69, 13, 1; %e A188481 1024, 874, 406, 109, 16, 1; %e A188481 4096, 3958, 2186, 748, 158, 19, 1; %e A188481 16384, 17548, 11124, 4570, 1240, 216, 22, 1; %e A188481 65536, 76627, 54445, 25879, 8485, 1909, 283, 25, 1; %t A188481 Flatten[Table[Sum[Binomial[n+i,n]Binomial[n-i,k]2^(n-k-i),{i,0,n-k}],{n,0,8},{k,0,8}]] %o A188481 (Maxima) create_list(sum(binomial(n+i,n)*binomial(n-i,k)*2^(n-k-i),i,0,n-k),n,0,8,k,0,n); %Y A188481 Cf. A141223, A188482. %K A188481 nonn,easy,tabl %O A188481 0,2 %A A188481 _Emanuele Munarini_, Apr 01 2011 %E A188481 Comment corrected by _Philippe Deléham_, Jan 22 2014