A079252 Even numbers not in A079000.

2, 10, 12, 14, 22, 24, 26, 28, 30, 32, 46, 48, 50, 52, 54, 56, 58, 60, 62, 64, 66, 68, 94, 96, 98, 100, 102, 104, 106, 108, 110, 112, 114, 116, 118, 120, 122, 124, 126, 128, 130, 132, 134, 136, 138, 140, 190, 192, 194, 196, 198, 200, 202, 204, 206

Offset

1,1

Links

Table of n, a(n) for n=1..55.

B. Cloitre, N. J. A. Sloane and M. J. Vandermast, Numerical analogues of Aronson's sequence, J. Integer Seqs., Vol. 6 (2003), #03.2.2.

B. Cloitre, N. J. A. Sloane and M. J. Vandermast, Numerical analogues of Aronson's sequence (math.NT/0305308)

Formula

See A079250 for formula.

Mathematica

nmax = 150;
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);
Complement[Range[2, b[nmax], 2], Table[b[n], {n, 1, nmax}]] (* Jean-François Alcover, Feb 13 2019 *)

Crossrefs

Sequence in context: A276103 A101222 A349831 * A108064 A057989 A050978

Adjacent sequences: A079249 A079250 A079251 * A079253 A079254 A079255

Keyword

nonn

Author

N. J. A. Sloane, Feb 04 2003

Status

approved