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

Author

Vincenzo Librandi, Aug 22 2016

Keywords

• nonn
• base
• easy

Links

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

Crossrefs

Cf. A168501, A276137.

Programs

Magma

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

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] &]

Formula

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