cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A359356 a(n-1) + a(n) has only digits also in a(n); lexicographically earliest such sequence of distinct nonnegative integers.

This page as a plain text file.
%I A359356 #23 Jan 06 2023 14:12:00
%S A359356 0,1,10,12,179,132,1048,416,135,126,125,1025,136,15,146,82,31,302,53,
%T A359356 128,183,130,14,157,1254,139,304,73,41,403,74,208,103,152,1028,91,21,
%U A359356 201,32,159,506,160,17,124,1036,104,51,504,95,16,204,62,129,203,52,503
%N A359356 a(n-1) + a(n) has only digits also in a(n); lexicographically earliest such sequence of distinct nonnegative integers.
%C A359356 Conjectured to be a permutation of the nonnegative integers.
%H A359356 Alois P. Heinz, <a href="/A359356/b359356.txt">Table of n, a(n) for n = 0..20000</a>
%H A359356 Eric Angelini, <a href="https://mailman.xmission.com/hyperkitty/list/math-fun@mailman.xmission.com/thread/ZUE3KBEIWDDDDNU2JJXLGWTEEONKLPYT/">A last pair sum linked to an alphabet</a>, [math-fun] list, Dec. 26, 2022.
%e A359356 The sequence of pairwise sums a(n-1) + a(n), n > 0, is (1, 11, 22, 191, 311, 1180, 1464, 551, 261, 251, 1150, 1161, 151, 161, 228, 113, 333, 355, 181, 311, ...)
%e A359356 After the smallest possible choice a(0) = 0, a(1) = 1 has the same digits as a(0) + a(1).
%e A359356 Then, a(2) = 10 is the smallest yet unused nonnegative integer such that a(1) + a(2) = 11 has all its digits also occurring in a(2). (The number 0 is excluded since it appeared earlier as a(0).)
%e A359356 Then, a(3) = 12 is the smallest yet unused nonnegative integer such that a(2) + a(3) = 22 has all its digits also occurring in a(3). (The smaller solutions 0 and 1 are again excluded since they appeared earlier.)
%p A359356 b:= proc() false end:
%p A359356 d:= proc(n) option remember; {convert(n, base, 10)[]} end:
%p A359356 a:= proc(n) option remember; local k; for k
%p A359356       while b(k) or d(a(n-1)+k) minus d(k)<>{} do od:
%p A359356       b(k):= true; k
%p A359356     end: a(0):=0:
%p A359356 seq(a(n), n=0..55);  # _Alois P. Heinz_, Jan 03 2023
%o A359356 (Python)
%o A359356 def A359356(n, A=[0]):
%o A359356   while len(A) <= n:
%o A359356     t = 0
%o A359356     while t in A or any(d not in str(t) for d in str(t+A[-1])):
%o A359356       t += 1
%o A359356     A.append(t)
%o A359356   return A[n]
%Y A359356 Cf. A359517 (conjectured inverse permutation).
%K A359356 nonn,base
%O A359356 0,3
%A A359356 _M. F. Hasler_ and _Eric Angelini_, Dec 27 2022