A044687 - OEIS

%I #7 May 25 2022 16:32:04

%S 55,136,217,298,379,460,503,541,622,703,784,865,946,1027,1108,1189,

%T 1232,1270,1351,1432,1513,1594,1675,1756,1837,1918,1961,1999,2080,

%U 2161,2242,2323,2404,2485,2566,2647,2690,2728,2809

%N Numbers n such that string 6,1 occurs in the base 9 representation of n but not of n+1.

%t SequencePosition[Table[If[SequenceCount[IntegerDigits[n,9],{6,1}]>0,1,0],{n,3000}],{1,0}][[All,1]] (* _Harvey P. Dale_, May 25 2022 *)

%K nonn,base

%O 1,1

%A _Clark Kimberling_