A338839 No odd digit is present in a(n) + a(n+1).

0, 2, 4, 16, 6, 14, 8, 12, 10, 18, 22, 20, 24, 36, 26, 34, 28, 32, 30, 38, 42, 40, 44, 156, 46, 154, 48, 152, 50, 150, 52, 148, 54, 146, 56, 144, 58, 142, 60, 140, 62, 138, 64, 136, 66, 134, 68, 132, 70, 130, 72, 128, 74, 126, 76, 124, 78, 122, 80, 120, 82, 118, 84, 116, 86, 114, 88, 112, 90, 110, 92

Offset

1,2

Comments

This is the lexicographically earliest sequence of distinct nonnegative terms with this property.

Links

Carole Dubois, Table of n, a(n) for n = 1..9999

Example

a(1) + a(2) = 0 + 2 = 2 (no odd digit is present);
a(2) + a(3) = 2 + 4 = 6 (no odd digit is present);
a(3) + a(4) = 4 + 16 = 20 (no odd digit is present); etc.

Mathematica

Block[{a = {0}}, Do[Block[{k = 2}, While[Nand[FreeQ[a, k], AllTrue[IntegerDigits@ Total[a[[-1]] + k], EvenQ]], k += 2]; AppendTo[a, k]], {i, 2, 71}]; a] (* Michael De Vlieger, Nov 12 2020 *)

Crossrefs

Cf. A014263 (no odd digit).

Cf. A338840, A338841, A338842, A338843, A338844, A338845, A338846 (variants on the same idea).

Sequence in context: A332352 A217291 A364247 * A350554 A094670 A110005

Adjacent sequences: A338836 A338837 A338838 * A338840 A338841 A338842

Keyword

base,nonn

Author

Eric Angelini and Carole Dubois, Nov 11 2020

Status

approved