%I #10 Feb 01 2025 12:47:46
%S 16,97,152,178,259,340,421,502,583,664,745,826,881,907,988,1069,1150,
%T 1231,1376,1393,1474,1555,1610,1636,1717,1798,1879,1960,2041,2122,
%U 2203,2284,2339,2365,2446,2527,2608,2689,2770,2851
%N Numbers n such that string 1,7 occurs in the base 9 representation of n but not of n+1.
%H Harvey P. Dale, <a href="/A044648/b044648.txt">Table of n, a(n) for n = 1..1000</a>
%t SequencePosition[Table[If[SequenceCount[IntegerDigits[n,9],{1,7}]>0,1,0],{n,3000}],{1,0}][[;;,1]] (* _Harvey P. Dale_, Feb 01 2025 *)
%K nonn,base,changed
%O 1,1
%A _Clark Kimberling_