OFFSET
1,1
COMMENTS
LINKS
Eric Weisstein's World of Mathematics, Good Prime
C. Rivera, Consecutive 'good' primes
EXAMPLE
11 is in the sequence because 11 is a palindromic number which is
a good prime(11^2>7*13, 11^2>5*17, 11^2>3*19 & 11^2>2*23).
MATHEMATICA
b[n_]:=(For[m=1, m<n&&Prime[n]^2>Prime[n-m]Prime[n+m], m++ ]; m); v={}; Do[If[IntegerDigits[Prime[n]]==Reverse[IntegerDigits[Prime [n]]]&& b[n]==n, v=Append[v, Prime[n]]; Print[v]], {n, 6986301}]
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Farideh Firoozbakht, Jun 28 2004
STATUS
approved