login
Numbers whose base-5 expansion has no run of digits with length < 2.
2

%I #19 Aug 14 2021 02:15:59

%S 6,12,18,24,31,62,93,124,150,156,162,168,174,300,306,312,318,324,450,

%T 456,462,468,474,600,606,612,618,624,750,775,781,787,793,799,812,843,

%U 874,1500,1531,1550,1556,1562,1568,1574,1593

%N Numbers whose base-5 expansion has no run of digits with length < 2.

%H Vincenzo Librandi, <a href="/A033018/b033018.txt">Table of n, a(n) for n = 1..1400</a>

%t Select[Range[10000],Min[Length/@Split[IntegerDigits[#, 5]]]>1&] (* _Vincenzo Librandi_, Feb 05 2014 *)

%Y Cf. A007091. Supersequence of A033003.

%K nonn,base

%O 1,1

%A _Clark Kimberling_