|
%I #26 Apr 29 2023 17:37:16
%S 1,2,13,24,3,5,14,16,25,27,36,38,4,7,49,15,18,60,26,29,71,37,40,8,248,
%T 51,19,259,6,230,270,17,241,28,12,82,52,39,23,9,363,50,34,20,374,61,
%U 45,31,385,72,56,42,396,83,67,53,407,94,78,64,41,810,58,97,55
%N The succession of the digits of the sequence remains the same when 11 is added to each term.
%C This is the lexicographically earliest sequence of distinct positive terms with this property.
%H Michael S. Branicky, <a href="/A362433/b362433.txt">Table of n, a(n) for n = 1..10000</a>
%e The values of a(n) + 11 begin:
%e 1 + 11 = 12,
%e 2 + 11 = 13,
%e 13 + 11 = 24,
%e 24 + 11 = 35,
%e 3 + 11 = 14,
%e 5 + 11 = 16,
%e 14 + 11 = 25, etc.
%e We see that the succession of digits in the first column is the same as the succession of digits in the last column.
%o (Python)
%o from itertools import islice
%o def agen(): # generator of terms
%o aset, an, s = {"1"}, 2, "2"
%o yield 1
%o while True:
%o i = next(i for i in range(1, len(s)+1) if s[:i] not in aset and (i == len(s) or s[i] != "0"))
%o an = int(str(s[:i]))
%o s = s[i:] + str(an+11)
%o aset.add(str(an))
%o yield an
%o print(list(islice(agen(), 65))) # _Michael S. Branicky_, Apr 28 2023
%Y Cf. A360227.
%K nonn,base
%O 1,2
%A _Eric Angelini_, Apr 20 2023
%E a(30) and beyond from _Michael S. Branicky_, Apr 28 2023
|
