A367351 Analog of A121805, but starting with 7.

7, 85, 136, 197, 269, 362, 385, 439, 534, 579, 675, 732, 759, 857, 936

Offset: 1

Author

N. J. A. Sloane, Nov 17 2023

Keywords

• nonn
• fini
• full
• base

Crossrefs

Comma sequences in base 10, starting with 1, 2, 4, 5, 6, 7, 8, 9, 10 are A121805, A139284, A366492, A367337, A367350, A367351, A367352, A367353, A367354. Starting with 3 is trivial, and those starting with 11, 12, 13 are essentially duplicates.

Cf. A330128, A330129.

Programs

Mathematica

b = 10; m = b - 1; a[1] = 7; a[n_] := a[n] = For[r = Mod[a[n - 1], b]; y = 0, y <= m, y++, If[y == IntegerDigits[#, b][[1]], Return[#]] &[a[n - 1] + b r + y]]; TakeWhile[Array[a, 45], IntegerQ] (* Michael De Vlieger, Nov 18 2023, after Jean-François Alcover at A121805 *)

Python

def agen(start=7): # generator of terms
    an, y = start, 1
    while y < 10:
        yield an
        an, y = an + 10*(an%10), 1
        while y < 10:
            if str(an+y)[0] == str(y):
                an += y
                break
            y += 1
print(list(agen())) # Michael S. Branicky, Nov 18 2023