|
%I #7 Jul 22 2024 17:11:51
%S 89,170,251,332,413,494,575,656,737,801,818,899,980,1061,1142,1223,
%T 1304,1385,1466,1530,1547,1628,1709,1790,1871,1952,2033,2114,2195,
%U 2259,2276,2357,2438,2519,2600,2681,2762,2843,2924
%N Numbers n such that string 0,8 occurs in the base 9 representation of n but not of n-1.
%t SequencePosition[Table[If[SequenceCount[IntegerDigits[n,9],{0,8}]>0,1,0],{n,3000}],{0,1}][[;;,2]] (* _Harvey P. Dale_, Jul 22 2024 *)
%K nonn,base
%O 1,1
%A _Clark Kimberling_
|
