OFFSET
1,1
LINKS
Andrew Howroyd, Table of n, a(n) for n = 1..1000
MATHEMATICA
Take[Times@@@Module[{nn=300, pp}, pp=Select[Prime[Range[nn]], PalindromeQ]; Subsets[pp, {4}]]//Union, 40] (* Harvey P. Dale, Aug 13 2024 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Patrick De Geest, Jun 15 1998
EXTENSIONS
Offset changed and a(37) onwards from Andrew Howroyd, Aug 14 2024
STATUS
approved