OFFSET
1,1
COMMENTS
A first order fractal palindromic prime is one of the form WmW, where either wing W about a central digit m, is itself a palindromic prime, which, however, may not be further split in this manner to maintain the property.
[Log_10(a(n))] must be of the form k2. - Robert G. Wilson v, Jul 22 2005
LINKS
Michael S. Branicky, Table of n, a(n) for n = 1..21046 (all terms < 10^26, corresponding to b-file of A082598)
EXAMPLE
12421812421 is in the sequence because it is a concatenation of the palindromic prime part 12421 with itself, hinging over the central 8;12421 cannot however be split into simpler palindromic primes in this way.
MATHEMATICA
f[n_] := Block[{m = n}, pd = IntegerDigits[m]; pd = Take[pd, Floor[Length[pd]/2]]; If[PrimeQ[m] && PrimeQ[FromDigits[pd]] && pd == Reverse[pd] && m == FromDigits[Reverse[IntegerDigits[m]]] && ! f[FromDigits[pd]], True, False]]; Do[ If[ f[n], Print[n]], {n, 10^10}] (* Robert G. Wilson v, Jul 22 2005 *)
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Lekraj Beedassy, May 07 2003
EXTENSIONS
a(25) and beyond from Michael S. Branicky, May 19 2024
STATUS
approved