OFFSET
1,1
COMMENTS
The only prime term is 3.
a(n) is a square or twice a square for n > 1. If a(n) is odd and n > 1, then a(n) must be a square. - Altug Alkan, Jul 16 2016
LINKS
Charles R Greathouse IV, Table of n, a(n) for n = 1..10000
EXAMPLE
Number 8 is in the sequence because sigma(8)-2 = 15-2 = 13 (prime).
MATHEMATICA
Select[Range[4000], PrimeQ[DivisorSigma[1, #] - 2] &] (* Vincenzo Librandi, Nov 14 2014 *)
PROG
(Magma) [n: n in[1..100000] | IsPrime(SumOfDivisors(n)- 2)]
(PARI) for(n=1, 10000, if(isprime(sigma(n)-2), print1(n, ", "))) \\ Derek Orr, Nov 13 2014
(PARI) list(lim)=my(v=List([3]), t); for(n=2, sqrtint(lim\1), if(isprime(sigma(t=n^2)-2), listput(v, t))); for(n=2, sqrtint(lim\2), if(isprime(sigma(t=2*n^2)-2), listput(v, t))); Set(v) \\ Charles R Greathouse IV, Jul 16 2016
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Jaroslav Krizek, Nov 13 2014
STATUS
approved