A262532 Minimal nested palindromic primes with seed 00000.

140000041, 31400000413, 9314000004139, 74931400000413947, 3749314000004139473, 937493140000041394739, 3693749314000004139473963, 10369374931400000413947396301, 351036937493140000041394739630153, 7035103693749314000004139473963015307

Offset: 2

Author

Clark Kimberling, Sep 24 2015

Keywords

• nonn
• base
• easy

Comments

Let s be a palindrome and put a(1) = s. Let a(2) be the least palindromic prime having s in the middle; for n > 2, let a(n) be the least palindromic prime having a(n-1) in the middle. Then (a(n)) is the sequence of minimal nested palindromic primes with seed s. (For A252532, the seed is not an integer, so that the offset is 2.)

Examples

			As a triangle:
          00000
        140000041
       31400000413
      9314000004139
    74931400000413947
   3749314000004139473
  937493140000041394739
		

Links

• Clark Kimberling, Table of n, a(n) for n = 2..200

Crossrefs

Cf. A261881.

Programs

Mathematica

s0 = "00000"; s = {ToExpression[s0]};Do[NestWhile[# + 1 &, 1, ! PrimeQ[tmp = FromDigits[Join[#, IntegerDigits[Last[s], 10, Max[StringLength[s0],Length[IntegerDigits[Last[s]]]]], Reverse[#]]&[IntegerDigits[#]]]] &]; AppendTo[s, tmp], {10}]; s0 <> ", " <> StringTake[ToString[Rest[s]], {2, -2}]
(* Peter J. C. Moses, Sep 23 2015 *)