A096473 Palindromic good primes.
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
Offset: 1
Examples
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).
Links
- Carlos Rivera, Puzzle 273. Consecutive 'good' primes, The Prime Puzzles & Problems Connection.
- Eric Weisstein's World of Mathematics, Good Prime.
Programs
-
Mathematica
b[n_]:=(For[m=1, m
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}]
Comments