|
%I #15 May 10 2020 15:54:46
%S 100,101,102,103,104,105,106,107,108,109,200,201,202,203,204,205,206,
%T 207,208,209,300,301,302,303,304,305,306,307,308,309,400,401,402,403,
%U 404,405,406,407,408,409,500,501,502,503,504,505,506,507,508,509,600,601,602,603,604,605,606
%N Numbers whose decimal representation has at least one '0' digit in a position other than the final digit.
%C Similar but different sequences are the "Cyclops numbers" A134808 and A032945 and A051022, which are subsequences, except for the 1- and 2-digit terms.
%C Also, numbers whose decimal representation cannot be split up between any two digits without producing a string with a leading zero (other than "0" itself).
%C Also, numbers n > 9 such that floor(n/10) is in A011540, i.e., has a digit '0'.
%H M. F. Hasler, <a href="/A252480/b252480.txt">Table of n, a(n) for n = 1..10000</a>
%H <a href="/index/Ar#10-automatic">Index entries for 10-automatic sequences</a>.
%t Select[Range[10,700],DigitCount[Floor[#/10],10,0]>0&] (* _Harvey P. Dale_, May 10 2020 *)
%o (PARI) is(n)=n>9 && !vecmin(digits(n\10))
%K nonn,easy,base
%O 1,1
%A _M. F. Hasler_, Dec 28 2014
|
