OFFSET
1,2
COMMENTS
An Ulam-type sequence - see A002858 for many further references, comments, etc.
REFERENCES
S. R. Finch, Mathematical Constants, Cambridge, 2003, pp. 145-151.
R. K. Guy, Unsolved Problems in Number Theory, Section C4.
R. K. Guy, "s-Additive sequences," preprint, 1994.
C. Pickover, Mazes for the Mind, St. Martin's Press, NY, 1992, p. 358.
N. J. A. Sloane, A Handbook of Integer Sequences, Academic Press, 1973 (includes this sequence).
N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).
S. M. Ulam, Problems in Modern Mathematics, Wiley, NY, 1960, p. ix.
LINKS
T. D. Noe, Table of n, a(n) for n = 1..10000
Steven R. Finch, Ulam s-Additive Sequences [From Steven Finch, Apr 20 2019]
Raymond Queneau, Sur les suites s-additives, J. Combin. Theory A 12(1) (1972), 31-71.
N. J. A. Sloane, Handwritten notes on Self-Generating Sequences, 1970 (note that A1148 has now become A005282)
S. M. Ulam, On some mathematical problems connected with patterns of growth of figures, pp. 215-224 of R. E. Bellman, ed., Mathematical Problems in the Biological Sciences, Proc. Sympos. Applied Math., Vol. 14, Amer. Math. Soc., 1962. [Annotated scanned copy]
Eric Weisstein's World of Mathematics, Ulam Sequence.
Wikipedia, Ulam number.
EXAMPLE
7 is missing since 7 = 1 + 6 = 3 + 4; but 8 is present since 8 = 3 + 5 has a unique representation.
MATHEMATICA
s = {1, 3}; Do[ AppendTo[s, n = Last[s]; While[n++; Length[ DeleteCases[ Intersection[s, n-s], n/2, 1, 1]] != 2]; n], {60}]; s (* Jean-François Alcover, Oct 20 2011 *)
PROG
(Haskell)
a002859 n = a002859_list !! (n-1)
a002859_list = 1 : 3 : ulam 2 3 a002859_list
-- Function ulam as defined in A002858.
-- Reinhard Zumkeller, Nov 03 2011
CROSSREFS
KEYWORD
nonn,nice
AUTHOR
STATUS
approved