cp's OEIS Frontend

A166976 Array of A002450 in the top row and higher-order differences in subsequent rows, read by antidiagonals.

%I A166976 #8 Feb 24 2019 21:09:29
%S A166976 0,1,1,3,4,5,9,12,16,21,27,36,48,64,85,81,108,144,192,256,341,243,324,
%T A166976 432,576,768,1024,1365,729,972,1296,1728,2304,3072,4096,5461,2187,
%U A166976 2916,3888,5184,6912,9216,12288,16384,21845,6561
%N A166976 Array of A002450 in the top row and higher-order differences in subsequent rows, read by antidiagonals.
%F A166976 T(0,k) = A002450(k). T(n,k) = T(n-1,k+1) - T(n-1,k), n > 0.
%e A166976 The array starts:
%e A166976 0,   1,   5,  21,  85, 341,1365,5461,21845,87381,349525,    A002450
%e A166976 1,   4,  16,  64, 256,1024,4096,16384,65536,262144,1048576, A000302
%e A166976 3,  12,  48, 192, 768,3072,12288,49152,196608,786432,       A002001, A164346, A110594
%e A166976 9,  36, 144, 576,2304,9216,36864,147456                     A002063, A055841
%p A166976 A002450 := proc(n) (4^n-1)/3 ; end proc:
%p A166976 A166976 := proc(n,k) option remember; if n = 0 then A002450(k) else procname(n-1,k+1)-procname(n-1,k) ; end if; end proc: # _R. J. Mathar_, Jul 02 2011
%K A166976 nonn,easy,tabl
%O A166976 0,4
%A A166976 _Paul Curtz_, Oct 26 2009