A098952 Integers divisible by their number of digits.

0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 12, 14, 16, 18, 20, 22, 24, 26, 28, 30, 32, 34, 36, 38, 40, 42, 44, 46, 48, 50, 52, 54, 56, 58, 60, 62, 64, 66, 68, 70, 72, 74, 76, 78, 80, 82, 84, 86, 88, 90, 92, 94, 96, 98, 102, 105, 108, 111, 114, 117, 120, 123, 126, 129, 132, 135, 138, 141

Offset: 1

Author

Eric Angelini, Oct 21 2004

Keywords

• nonn
• base
• easy

Comments

Complement of A171491. [Jaroslav Krizek, Dec 10 2009]

Examples

			102 has three digits and is divisible by 3, therefore 102 is in the sequence.
		

Links

• Harvey P. Dale, Table of n, a(n) for n = 1..1000

Crossrefs

Cf. A171491.

Programs

Magma

[0] cat [n: n in [1..150] | IsIntegral(n/#Intseq(n))]; // Bruno Berselli, Feb 09 2016

Mathematica

Join[{0},Select[Range[150],Divisible[#,IntegerLength[#]]&]] (* Harvey P. Dale, Dec 13 2020 *)

Python

def ok(n): return n%len(str(n)) == 0
print([k for k in range(142) if ok(k)]) # Michael S. Branicky, Feb 07 2022

Extensions

Corrected by T. D. Noe, Oct 25 2006