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.
%I A373056 #5 May 21 2024 05:27:52 %S A373056 1,2,3,4,16,52,204,255,4259,4262,4265,4855 %N A373056 Numbers k that divide the k-th Ulam number. %C A373056 Numbers k such that k | A002858(k). %C A373056 a(13) >= 10^8, if it exists. %C A373056 Based on empirical data its seems that the Ulam numbers have a positive asymptotic density and that A002858(k) ~ 13.5... * k (see A307331 and A346216). If this is true, then this sequence is finite, and it is likely that there are no more terms. %H A373056 <a href="/index/U#Ulam_num">Index entries for Ulam numbers</a>. %e A373056 16 is a term since A002858(16) = 48 = 3 * 16 is divisible by 16. %t A373056 ulams = {1, 2}; Do[AppendTo[ulams, n = Last[ulams]; While[n++; Length[DeleteCases[ Intersection[ulams, n - ulams], n/2, 1, 1]] != 2]; n], {5000}]; %t A373056 Position[ulams/Range[Length[ulams]], _?IntegerQ] // Flatten (* after _Jean-François Alcover_ at A002858 *) %Y A373056 Cf. A002858, A307331, A346216. %Y A373056 Similar sequences: A014847 (Catalan), A016089 (Lucas), A023172 (Fibonacci), A051177 (partition), A232570 (tribonacci), A246692 (Pell), A266969 (Motzkin). %K A373056 nonn,more %O A373056 1,2 %A A373056 _Amiram Eldar_, May 21 2024