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
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
Comments