login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A051934 a(n) = smallest palindrome > a(n-1) such that a(1)+a(2)+...+a(n) is a prime. 5
2, 3, 6, 8, 22, 66, 242, 252, 262, 414, 444, 626, 676, 686, 808, 2442, 2552, 2992, 4664, 4884, 6006, 6226, 6666, 8228, 20202, 20302, 20402, 40204, 40304, 60606, 61116, 61716, 80608, 202202, 207702, 212212, 402204, 405504, 609906, 619916, 623326, 801108 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

LINKS

Reinhard Zumkeller, Table of n, a(n) for n = 1..100

MATHEMATICA

palQ[n_] := Reverse[x = IntegerDigits[n]] == x; t = {s = 2}; Do[If[palQ[n] && PrimeQ[x = s + n], AppendTo[t, n]; s = x], {n, 3, 815000}]; t (* Jayanta Basu, Jun 24 2013 *)

PROG

(Haskell)

a051934 n = a051934_list !! (n-1)

a051934_list = f 0 a002113_list where

   f x (m:ms) | a010051 (x + m) == 1 = m : f (x + m) ms

              | otherwise            = f x ms

-- Reinhard Zumkeller, Dec 28 2011

CROSSREFS

Cf. A002113, A010051, A087581.

Sequence in context: A072847 A274371 A095895 * A153915 A093705 A281645

Adjacent sequences:  A051931 A051932 A051933 * A051935 A051936 A051937

KEYWORD

easy,nice,nonn,base

AUTHOR

Felice Russo, Dec 21 1999

EXTENSIONS

Missing a(29)=40304 inserted by Reinhard Zumkeller, Dec 28 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.

License Agreements, Terms of Use, Privacy Policy. .

Last modified October 16 20:55 EDT 2019. Contains 328103 sequences. (Running on oeis4.)