%I #9 Oct 06 2025 05:14:02
%S 48,129,210,291,372,432,453,534,615,696,777,858,939,1020,1101,1161,
%T 1182,1263,1344,1425,1506,1587,1668,1749,1830,1890,1911,1992,2073,
%U 2154,2235,2316,2397,2478,2559,2619,2640,2721,2802,2883,2964,3045,3126,3207,3288,3348,3369
%N Numbers k such that the string 5,3 occurs in the base 9 representation of k but not of k-1.
%H Paolo Xausa, <a href="/A044299/b044299.txt">Table of n, a(n) for n = 1..10000</a>
%t A044299Q[k_] := StringContainsQ[IntegerString[k, 9], "53"] && StringFreeQ[IntegerString[k - 1, 9], "53"];
%t Select[Range[5000], A044299Q] (* _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