A044297 Numbers k such that the string 5,1 occurs in the base 9 representation of k but not of k-1.

46, 127, 208, 289, 370, 414, 451, 532, 613, 694, 775, 856, 937, 1018, 1099, 1143, 1180, 1261, 1342, 1423, 1504, 1585, 1666, 1747, 1828, 1872, 1909, 1990, 2071, 2152, 2233, 2314, 2395, 2476, 2557, 2601, 2638, 2719, 2800, 2881, 2962, 3043, 3124, 3205, 3286, 3330, 3367

Offset

1,1

Links

Paolo Xausa, Table of n, a(n) for n = 1..10000

Mathematica

A044297Q[k_] := StringContainsQ[IntegerString[k, 9], "51"] && StringFreeQ[IntegerString[k - 1, 9], "51"];
Select[Range[5000], A044297Q] (* Paolo Xausa, Oct 03 2025 *)

Crossrefs

Cf. A007095.

Sequence in context: A332592 A217083 A039529 * A044678 A074866 A229207

Adjacent sequences: A044294 A044295 A044296 * A044298 A044299 A044300

Keyword

nonn,base

Author

Clark Kimberling

Extensions

More terms from Paolo Xausa, Oct 03 2025

Status

approved