A004728 - OEIS

A004728

Delete all 9's from the sequence of nonnegative integers.

0, 1, 2, 3, 4, 5, 6, 7, 8, 10, 11, 12, 13, 14, 15, 16, 17, 18, 1, 20, 21, 22, 23, 24, 25, 26, 27, 28, 2, 30, 31, 32, 33, 34, 35, 36, 37, 38, 3, 40, 41, 42, 43, 44, 45, 46, 47, 48, 4, 50, 51, 52, 53, 54, 55, 56, 57, 58, 5, 60, 61, 62, 63, 64, 65, 66, 67, 68, 6, 70, 71

(list; graph; refs; listen; history; text; internal format)

OFFSET

0,3

LINKS

Table of n, a(n) for n=0..70.

MATHEMATICA

Join[{0}, Table[FromDigits[IntegerDigits[n]/.(9->Nothing)], {n, 90}]/.(0-> Nothing)] (* Harvey P. Dale, Aug 10 2019 *)

PROG

(Python)

def A004728(n):

l = len(str(n))

m = 10**l-1