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 A106399 #8 Nov 28 2017 11:35:44
%S A106399 1,1,2,4,8,16,31,58,107,200,387,782,1640,3512,7542,16020,33406,68257,
%T A106399 136971,271341,534302,1053441,2092840,4206655,8564397,17631551,
%U A106399 36575711,76137143,158427407,328537434,677598776,1388303692,2824261172,5704560206,11443336382
%N A106399 Binomial transform of A100060.
%C A106399 1 or 0 are assigned to increase or decrease in magnitude of a succession of terms in the first difference row of Zeta function heights, as recorded in A100060.
%F A106399 Use the binomial transform operation (bto) on A100060, i.e. (bto): [1, 0, 1, 0, 1, 0, 0, 1, 0, 1, 1, 0, 0, 1,
%e A106399 a(5) = 8 = 1*1 + 4*0 + 6*1 + 4*0 + 1*1.
%t A106399 nmax = 40; A100060 = (Sign[Differences[Im[ZetaZero[Range[nmax+2]]], 2]] + 1)/2; Flatten[{1, Table[1 + Sum[Binomial[n, k]*A100060[[k]], {k, 1, n}], {n, 1, nmax}]}] (* _Vaclav Kotesovec_, Nov 28 2017 *)
%Y A106399 Cf. A100060.
%K A106399 nonn
%O A106399 1,3
%A A106399 _Gary W. Adamson_, May 01 2005
%E A106399 a(11) corrected by _Vaclav Kotesovec_, Nov 28 2017
%E A106399 More terms from _Vaclav Kotesovec_, Nov 28 2017