%I #9 Oct 06 2025 05:16:56
%S 51,132,213,294,375,456,459,537,618,699,780,861,942,1023,1104,1185,
%T 1188,1266,1347,1428,1509,1590,1671,1752,1833,1914,1917,1995,2076,
%U 2157,2238,2319,2400,2481,2562,2643,2646,2724,2805,2886,2967,3048,3129,3210,3291,3372,3375
%N Numbers k such that the string 5,6 occurs in the base 9 representation of k but not of k-1.
%H Paolo Xausa, <a href="/A044302/b044302.txt">Table of n, a(n) for n = 1..10000</a>
%t A044302Q[k_] := StringContainsQ[IntegerString[k, 9], "56"] && StringFreeQ[IntegerString[k - 1, 9], "56"];
%t Select[Range[5000], A044302Q] (* _Paolo Xausa_, Oct 06 2025 *)
%Y Cf. A007095.
%K nonn,base
%O 1,1
%A _Clark Kimberling_
%E More terms from _Paolo Xausa_, Oct 06 2025