%I #7 Sep 06 2022 15:34:07
%S 55,136,217,298,379,460,495,541,622,703,784,865,946,1027,1108,1189,
%T 1224,1270,1351,1432,1513,1594,1675,1756,1837,1918,1953,1999,2080,
%U 2161,2242,2323,2404,2485,2566,2647,2682,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}],{0,1}][[All,2]] (* _Harvey P. Dale_, Sep 06 2022 *)
%K nonn,base
%O 1,1
%A _Clark Kimberling_