|
|
A180496
|
|
Largest palindromic prime < n-th-semiprime.
|
|
0
|
|
|
3, 5, 7, 7, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 101, 101, 101, 101, 101, 101, 101, 101, 101, 131, 131, 131, 131, 131, 131, 131, 151, 151, 151, 151, 151, 151, 151, 151, 181, 181, 181
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
With[{nn=150}, Module[{palpr=Reverse[Select[Prime[Range[nn]], IntegerDigits[ #] == Reverse[ IntegerDigits[#]]&]], semis = Select[Range[2nn], PrimeOmega[ #] == 2&]}, Flatten[Table[Select[palpr, #<semis[[n]]&, 1], {n, Length[ semis]}]]]] (* Harvey P. Dale, Jun 12 2014 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
base,easy,nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|