A176407 Omit all 1's and 2's from n.

0, 0, 0, 3, 4, 5, 6, 7, 8, 9, 0, 0, 0, 3, 4, 5, 6, 7, 8, 9, 0, 0, 0, 3, 4, 5, 6, 7, 8, 9, 30, 3, 3, 33, 34, 35, 36, 37, 38, 39, 40, 4, 4, 43, 44, 45, 46, 47, 48, 49, 50, 5, 5, 53, 54, 55, 56, 57, 58, 59, 60, 6, 6, 63, 64, 65, 66, 67, 68, 69, 70, 7, 7, 73, 74, 75, 76, 77, 78, 79, 80, 8, 8, 83, 84, 85, 86, 87, 88, 89, 90, 9, 9, 93, 94, 95, 96, 97, 98, 99, 0, 0, 0, 3, 4, 5, 6, 7, 8, 9, 0, 0, 0, 3, 4

Offset: 0

Author

Zak Seidov, Dec 07 2010

Keywords

• nonn
• base

Links

• Michel Marcus, Table of n, a(n) for n = 0..5000

Crossrefs

Cf. A004176 (Omit 1's from n), A004177 (Omit 2's from n).

Programs

Mathematica

Table[FromDigits[DeleteCases[IntegerDigits[n], 1 | 2]], {n, 300}]

PARI

a(n) = fromdigits(select(x->((x!=1) && (x!=2)), digits(n))); \\ Michel Marcus, Sep 17 2017