OFFSET
1,1
COMMENTS
The subsequence of those values which are themselves primes begins: 3, 7, 31, 211, 2311, 6575388435279972570571. - Jonathan Vos Post, Feb 09 2011
MATHEMATICA
palpQ[n_]:=Module[{idn=IntegerDigits[n]}, idn==Reverse[idn]]; #+1&/@FoldList[ Times, 1, Select[Prime[Range[500]], palpQ]] (* Harvey P. Dale, Apr 23 2011 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
EXTENSIONS
Corrected and extended by Patrick De Geest, Sep 15 2000
More terms from Harvey P. Dale, Apr 23 2011
STATUS
approved