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

37, 73, 109, 145, 181, 217, 222, 253, 289, 325, 361, 397, 433, 438, 469, 505, 541, 577, 613, 649, 654, 685, 721, 757, 793, 829, 865, 870, 901, 937, 973, 1009, 1045, 1081, 1086, 1117, 1153, 1189, 1225, 1261, 1297, 1302, 1332, 1369, 1405, 1441, 1477, 1513, 1518, 1549

Offset

1,1

Links

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

Mathematica

A044103Q[k_] := StringContainsQ[IntegerString[k, 6], "01"] && StringFreeQ[IntegerString[k - 1, 6], "01"];
Select[Range[5000], A044103Q] (* Paolo Xausa, Sep 23 2025 *)

Crossrefs

Cf. A007092.

Sequence in context: A155087 A171807 A178399 * A044484 A158065 A142100

Adjacent sequences: A044100 A044101 A044102 * A044104 A044105 A044106

Keyword

nonn,base

Author

Clark Kimberling

Extensions

More terms from Paolo Xausa, Sep 23 2025

Status

approved