|
|
A373056
|
|
Numbers k that divide the k-th Ulam number.
|
|
0
|
|
|
1, 2, 3, 4, 16, 52, 204, 255, 4259, 4262, 4265, 4855
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
Numbers k such that k | A002858(k).
a(13) >= 10^8, if it exists.
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.
|
|
LINKS
|
|
|
EXAMPLE
|
16 is a term since A002858(16) = 48 = 3 * 16 is divisible by 16.
|
|
MATHEMATICA
|
ulams = {1, 2}; Do[AppendTo[ulams, n = Last[ulams]; While[n++; Length[DeleteCases[ Intersection[ulams, n - ulams], n/2, 1, 1]] != 2]; n], {5000}];
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,more
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|