|
|
A096473
|
|
Palindromic good primes.
|
|
2
|
|
|
5, 11, 101, 191, 727, 929, 30803, 74047, 77477, 1123211, 1150511, 1338331, 1444441, 1684861, 1761671, 3065603, 3392933, 3503053, 3541453, 9779779, 9845489, 9926299, 9927299, 9932399, 112959211, 113030311, 114535411, 119676911
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
Thus, version 2 (A028388) of the definition of "good primes" is used here. [From Harvey P. Dale, May 13 2012]
|
|
LINKS
|
|
|
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
|
|
|
STATUS
|
approved
|
|
|
|