cp's OEIS Frontend

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.

A079252 Even numbers not in A079000.

This page as a plain text file.
%I A079252 #11 Feb 13 2019 07:57:32
%S A079252 2,10,12,14,22,24,26,28,30,32,46,48,50,52,54,56,58,60,62,64,66,68,94,
%T A079252 96,98,100,102,104,106,108,110,112,114,116,118,120,122,124,126,128,
%U A079252 130,132,134,136,138,140,190,192,194,196,198,200,202,204,206
%N A079252 Even numbers not in A079000.
%H A079252 B. Cloitre, N. J. A. Sloane and M. J. Vandermast, <a href="http://www.cs.uwaterloo.ca/journals/JIS/VOL6/Cloitre/cloitre2.html">Numerical analogues of Aronson's sequence</a>, J. Integer Seqs., Vol. 6 (2003), #03.2.2.
%H A079252 B. Cloitre, N. J. A. Sloane and M. J. Vandermast, <a href="http://arXiv.org/abs/math.NT/0305308">Numerical analogues of Aronson's sequence</a> (math.NT/0305308)
%F A079252 See A079250 for formula.
%t A079252 nmax = 150;
%t A079252 b[1] = 1; b[n_] := (k = Floor[Log[2, (n + 3)/6]]; j = n - (9 2^k - 3); 12 2^k - 3 + 3 j/2 + Abs[j]/2);
%t A079252 Complement[Range[2, b[nmax], 2], Table[b[n], {n, 1, nmax}]] (* _Jean-François Alcover_, Feb 13 2019 *)
%K A079252 nonn
%O A079252 1,1
%A A079252 _N. J. A. Sloane_, Feb 04 2003