A171491 - OEIS

%I #19 Oct 03 2024 17:16:17

%S 11,13,15,17,19,21,23,25,27,29,31,33,35,37,39,41,43,45,47,49,51,53,55,

%T 57,59,61,63,65,67,69,71,73,75,77,79,81,83,85,87,89,91,93,95,97,99,

%U 100,101,103,104,106,107,109,110,112,113,115,116,118,119,121,122,124,125

%N Natural numbers not divisible by their number of decimal digits.

%C Complement of A098952.

%C Asymptotic density 1. [_Charles R Greathouse IV_, Nov 13 2010]

%H Michael S. Branicky, <a href="/A171491/b171491.txt">Table of n, a(n) for n = 1..10000</a>

%e 100 has three digits and is not divisible by 3, therefore 100 is in the sequence.

%t Select[Range[150],!Divisible[#,IntegerLength[#]]&]  (* _Harvey P. Dale_, Apr 24 2011 *)

%o (Magma) [n: n in [1..140] | not IsIntegral(n/#Intseq(n))]; // _Bruno Berselli_, Feb 09 2016

%o (Python)

%o def ok(n): return n%len(str(n))

%o print([k for k in range(142) if ok(k)]) # _Michael S. Branicky_, Feb 07 2022

%K nonn,base

%O 1,1

%A _Jaroslav Krizek_, Dec 10 2009