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 A107783 #8 Aug 08 2015 21:54:31
%S A107783 1,1,2,1,5,6,1,13,21,22,1,45,84,104,105,1,211,412,562,630,631,1,1263,
%T A107783 2500,3558,4285,4602,4603,1,9207,18305,26560,33180,37573,39468,39469,
%U A107783 1,78939,157243,230496,293794,342944,375058,388869,388870,1,777741
%N A107783 Array defined in A064643 read in direction in which it was created.
%p A107783 A107783 := proc(n,k) option remember ; if n < 0 or k < 0 or k > n then 0 ; elif n =0 then 1; elif n mod 2 = 1 then if n = k then 1; else A107783(n,k+1)+A107783(n-1,k-1)+A107783(n-1,k)+A107783(n-2,k-1) ; fi ; else if k = 0 then 1; else A107783(n,k-1)+A107783(n-1,k-1)+A107783(n-1,k)+A107783(n-2,k-1) ; fi ; fi ; end: for n from 0 to 11 do if ( n mod 2 ) = 1 then kstrt := n ; else kstrt := 0 ; fi ; kend := n-kstrt : for k from kstrt to kend by sign(kend-kstrt) do printf("%d,",A107783(n,k)) ; od: od: # _R. J. Mathar_, Aug 13 2007
%Y A107783 Cf. A064642, A064643, A064644.
%K A107783 nonn,tabl,easy
%O A107783 0,3
%A A107783 _N. J. A. Sloane_, Jun 15 2005
%E A107783 More terms from _R. J. Mathar_, Aug 13 2007