login
Numbers n such that string 1,7 occurs in the base 9 representation of n but not of n+1.
1

%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_