[go: up one dir, main page]

login
A158999
Palprimes of the form m*reversal(m)+1, sorted on m.
2
2, 5, 11, 101, 1008001, 1008001
OFFSET
1,1
COMMENTS
There is no further term up to 5*10^17. 1008001 is the only known palprime which has two representations of the form m*reversal(m)+1 (m > reversal(m)).
MATHEMATICA
r[n_]:=FromDigits[Reverse[IntegerDigits[n]]]; Do[If[m>=r[m]&&PrimeQ[m r[m]+1] && r[m r[m]+1]==m r[m]+1, Print[m r[m]+1]], {m, 710000000}]
CROSSREFS
Sequence in context: A134996 A134998 A078790 * A283300 A069506 A239900
KEYWORD
base,more,nonn
AUTHOR
Farideh Firoozbakht, Jul 09 2009
EXTENSIONS
Cross-reference fixed by Franklin T. Adams-Watters, May 14 2010
STATUS
approved