|
|
A028979
|
|
Palindromes which are the product of two consecutive primes.
|
|
3
|
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
No further terms < 2*10^17.
|
|
LINKS
|
|
|
EXAMPLE
|
323 = 17*19 is a member.
|
|
MATHEMATICA
|
palQ[n_] := n == FromDigits@ Reverse@ IntegerDigits@n; p = 2; q = 3; lst = {}; While[p < 6 10^9, If[ palQ[p*q], AppendTo[lst, p*q]; Print[p*q]]; p = q; q = NextPrime@q]; lst (* Robert G. Wilson v, Jun 11 2010 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|