This site is supported by donations to The OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A007697 Smallest odd number expressible in at least n ways as p+2*m^2 where p is 1 or a prime and m >= 0. (Formerly M2292) 7
 1, 3, 13, 19, 55, 61, 139, 139, 181, 181, 391, 439, 559, 619, 619, 829, 859, 1069, 1081, 1459, 1489, 1609, 1741, 1951, 2029, 2341, 2341, 3331, 3331, 3331, 3961, 4189, 4189, 4261, 4801, 4801, 5911, 5911, 5911, 6319, 6319, 6319, 8251, 8251, 8251, 8251, 8251 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,2 REFERENCES Godfrey Harold Hardy and John Edensor Littlewood, Some problems of `partitio numerorum'; III: On the expression of a number as a sum of primes, Acta Math., 44 (1922), 1-70. N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence). Moritz A. Stern, Sur un assertion de Goldbach relative aux nombres impairs, Nouvelles Annales Math. 15 (1856), 23-24. LINKS Donovan Johnson, Table of n, a(n) for n = 1..10000 L. Hodges, A lesser-known Goldbach conjecture, Math. Mag., 66 (1993), 45-47. MATHEMATICA max = 9000; sp = Outer[Plus, Prepend[Prime /@ Range[PrimePi[max]], 1], 2*Range[0, Ceiling[Sqrt[max/2]]]^2] // Flatten // Sort // Split; a[1] = 3; a[n_] := (sel = Select[sp, Length[#] >= n &]; If[sel == {}, {}, sel[[1, 1]]]); a /@ Range[47] (* Jean-François Alcover, Apr 29 2011 *) PROG (Haskell) import Data.List (findIndex) import Data.Maybe (fromJust) a007697 n = 2 * (fromJust \$ findIndex (>= n) a046921_list) + 1 -- Reinhard Zumkeller, Apr 03 2013 CROSSREFS Cf. A016067, A046921. Sequence in context: A018621 A236940 A024469 * A055202 A158016 A281998 Adjacent sequences:  A007694 A007695 A007696 * A007698 A007699 A007700 KEYWORD nonn,nice,easy AUTHOR EXTENSIONS Stern and Hardy-Littlewood references suggested by Ctibor O. Zizka, Apr 14 2008 Edited by N. J. A. Sloane, May 15 2008 at the suggestion of R. J. Mathar a(1) changed to 1 at the suggestion of Donovan Johnson. - N. J. A. Sloane, May 10 2011 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified July 23 22:38 EDT 2019. Contains 325278 sequences. (Running on oeis4.)