OFFSET
1,1
COMMENTS
Numbers of digits of primes corresponding to the four known terms of this sequence are respectively 2, 3, 133, and 232.
A naive heuristic suggests that this sequence is infinite but extremely sparse. - Charles R Greathouse IV, Nov 05 2013
There are no more terms below 10000. - Charles R Greathouse IV, Nov 09 2013
There are no more terms below 20000. - Michael S. Branicky, Nov 25 2024
LINKS
Carlos Rivera, Puzzle 8. Primes by Listing, The Prime Puzzles & Problems connection.
Eric Weisstein's World of Mathematics, Integer Sequence Primes
EXAMPLE
3 is in the sequence because sigma(3).sigma(2).sigma(1) = 431 is prime.
MATHEMATICA
Module[{nn=110, d}, d=DivisorSigma[1, Range[nn]]; Select[Range[nn], PrimeQ[ FromDigits[ Flatten[IntegerDigits/@Reverse[Take[d, #]]]]]&]] (* Harvey P. Dale, Jul 25 2016 *)
PROG
(PARI) s="1"; for(n=2, 1e3, s=Str(sigma(n), s); if(ispseudoprime(eval(s)), print1(n", "))) \\ Charles R Greathouse IV, Nov 05 2013
CROSSREFS
KEYWORD
base,more,nonn
AUTHOR
Farideh Firoozbakht, Oct 23 2004
STATUS
approved
