A044229 Numbers k such that string 5,2 occurs in the base 8 representation of k but not of k-1.
42, 106, 170, 234, 298, 336, 362, 426, 490, 554, 618, 682, 746, 810, 848, 874, 938, 1002, 1066, 1130, 1194, 1258, 1322, 1360, 1386, 1450, 1514, 1578, 1642, 1706, 1770, 1834, 1872, 1898, 1962, 2026, 2090, 2154, 2218, 2282, 2346
Offset: 1
Links
- Paolo Xausa, Table of n, a(n) for n = 1..10000
Crossrefs
Cf. A007094.
Programs
-
Mathematica
A044229Q[k_] := StringContainsQ[IntegerString[k, 8], "52"] && StringFreeQ[IntegerString[k - 1, 8], "52"]; Select[Range[5000], A044229Q] (* Paolo Xausa, Sep 03 2025 *)