|
%I #21 Mar 10 2020 23:51:08
%S 0,1,4,7,100,101,104,107,401,404,407,700,701,704,707
%N Numbers n without letters a, i, l or t.
%C The sequence terminates because all numbers above 707 contain the banned letters. - _Michael Joseph Halm_, Apr 13 2016
%H M. J. Halm, <a href="http://michaelhalm.tripod.com/id109.htm">Sequences (Re)discovered</a>, Mpossibilities 81 (Aug. 2002). See Entry LIII.
%t Reap[Do[If[StringFreeQ[IntegerName@ i, {"a", "i", "l", "t"}], Sow@ i], {i, 0, 10^3}]][[-1, 1]] (* _Michael De Vlieger_, Mar 10 2020 *)
%K easy,fini,full,nonn,word
%O 1,3
%A _Michael Joseph Halm_, Aug 13 2002
%E Wrong terms 64 and 343 removed by _Michael Joseph Halm_, Apr 13 2016
|
