|
%I #7 Dec 04 2021 13:29:17
%S 108,208,308,408,508,608,708,808,908,1008,1080,1108,1208,1308,1408,
%T 1508,1608,1708,1808,1908,2008,2080,2108,2208,2308,2408,2508,2608,
%U 2708,2808,2908,3008,3080,3108,3208,3308,3408,3508
%N Numbers n such that string 0,8 occurs in the base 10 representation of n but not of n-1.
%t SequencePosition[Table[If[SequenceCount[IntegerDigits[n],{0,8}]>0,1,0],{n,4000}],{0,1}][[All,2]] (* _Harvey P. Dale_, Dec 04 2021 *)
%K nonn,base
%O 1,1
%A _Clark Kimberling_
|
