A044183 Numbers k such that the string 6,3 occurs in the base 7 representation of k but not of k-1.

45, 94, 143, 192, 241, 290, 315, 339, 388, 437, 486, 535, 584, 633, 658, 682, 731, 780, 829, 878, 927, 976, 1001, 1025, 1074, 1123, 1172, 1221, 1270, 1319, 1344, 1368, 1417, 1466, 1515, 1564, 1613, 1662, 1687, 1711, 1760, 1809, 1858, 1907, 1956, 2005, 2030, 2054, 2103

Offset

1,1

Links

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

Mathematica

A044183Q[k_] := StringContainsQ[IntegerString[k, 7], "63"] && StringFreeQ[IntegerString[k - 1, 7], "63"];
Select[Range[5000], A044183Q] (* Paolo Xausa, Sep 08 2025 *)

Crossrefs

Cf. A007093.

Sequence in context: A101794 A124017 A121925 * A044564 A320884 A324460

Adjacent sequences: A044180 A044181 A044182 * A044184 A044185 A044186

Keyword

nonn,base

Author

Clark Kimberling

Extensions

More terms from Paolo Xausa, Sep 08 2025

Status

approved