A276138 Numbers without the decimal digits 1, 3, 5 and 7.

0, 2, 4, 6, 8, 9, 20, 22, 24, 26, 28, 29, 40, 42, 44, 46, 48, 49, 60, 62, 64, 66, 68, 69, 80, 82, 84, 86, 88, 89, 90, 92, 94, 96, 98, 99, 200, 202, 204, 206, 208, 209, 220, 222, 224, 226, 228, 229, 240, 242, 244, 246, 248, 249, 260, 262, 264, 266

Offset

1,2

Links

Robert Israel, Table of n, a(n) for n = 1..10000

Formula

a(6n-6+k) = 10 a(n) + a(k) for k = 1..6. - Robert Israel, Aug 24 2016

Maple

S:= [0]:
for d from 1 to 4 do S:= map(t ->  seq(10*t+i, i=[0, 2, 4, 6, 8, 9]), S) od:
S; # Robert Israel, Aug 24 2016

Mathematica

Select[Select[Select[Select[Range[0, 400], FreeQ[IntegerDigits@#, 1] &], FreeQ[IntegerDigits@#, 3] &], FreeQ[IntegerDigits@#, 5] &], FreeQ[IntegerDigits@#, 7] &]

Prog

(Magma) [n: n in [0..500] | IsEmpty(Set([1, 3, 5, 7]) meet Set(Intseq(n)))];

Crossrefs

Cf. A168501, A276137.

Sequence in context: A156759 A340609 A340606 * A114973 A004522 A004521

Adjacent sequences: A276135 A276136 A276137 * A276139 A276140 A276141

Keyword

nonn,base,easy

Author

Vincenzo Librandi, Aug 22 2016

Status

approved