|
%I #9 Sep 13 2018 03:05:03
%S 1,1,0,1,1,1,1,1,2,4,2,4,3,7,3,10,16,13,16,16,29,22,41,25,66,91,78,97,
%T 115,163,139,229,188,358,224,484,645,673,693,862,1138,1171,1558,1480,
%U 2375,1912,3179,2341,4740,5473,5916,6085,8221,9397
%N "BGK" (reversible, element, unlabeled) transform of 1,0,1,0,...
%H Andrew Howroyd, <a href="/A032059/b032059.txt">Table of n, a(n) for n = 0..1000</a>
%H C. G. Bower, <a href="/transforms2.html">Transforms (2)</a>
%o (PARI) seq(n)=[subst(serlaplace(y^0*p + polcoeff(p,1)),y,1)/2 | p <- Vec(y-1+prod(k=1, ceil(n/2), 1 + x^(2*k-1)*y + O(x*x^n)))] \\ _Andrew Howroyd_, Sep 13 2018
%K nonn
%O 0,9
%A _Christian G. Bower_
%E a(0)=1 prepended by _Andrew Howroyd_, Sep 13 2018
|
