|
%I #7 Oct 15 2021 13:09:19
%S 15,40,65,79,90,115,140,165,190,204,215,240,265,290,315,329,340,365,
%T 399,415,440,454,465,490,515,540,565,579,590,615,640,665,690,704,715,
%U 740,765,790,815,829,840,865,890,915,940,954,965
%N Numbers n such that string 3,0 occurs in the base 5 representation of n but not of n+1.
%t SequencePosition[Table[If[SequenceCount[IntegerDigits[n,5],{3,0}]>0,1,0],{n,1000}],{1,0}][[All,1]] (* _Harvey P. Dale_, Oct 15 2021 *)
%K nonn,base
%O 1,1
%A _Clark Kimberling_
|
