A044145 - OEIS

A044145

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

7, 49, 105, 154, 203, 252, 301, 343, 448, 497, 546, 595, 644, 693, 735, 791, 840, 889, 938, 987, 1036, 1078, 1134, 1183, 1232, 1281, 1330, 1379, 1421, 1477, 1526, 1575, 1624, 1673, 1722, 1764, 1820, 1869, 1918, 1967, 2016, 2065, 2107, 2163, 2212, 2261, 2310, 2359, 2401

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,1

LINKS

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

MATHEMATICA

A044145Q[k_] := StringContainsQ[IntegerString[k, 7], "10"] && StringFreeQ[IntegerString[k - 1, 7], "10"];

Select[Range[5000], A044145Q] (* Paolo Xausa, Sep 10 2025 *)

CROSSREFS

Cf. A007093.

Sequence in context: A008461 A043131 A082701 * A152777 A003530 A262269

Adjacent sequences: A044142 A044143 A044144 * A044146 A044147 A044148