OFFSET
1,2
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
EXAMPLE
sigma(145)+prime(145) = 1009 (prime).
MAPLE
select(k -> isprime(numtheory:-sigma(k) + ithprime(k)), [$1..1000]); # Robert Israel, Aug 18 2024
MATHEMATICA
Select[Range[156], PrimeQ[DivisorSigma[1, #]+Prime[#]]&] (* James C. McMahon, Aug 18 2024 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Giovanni Resta, Feb 13 2006
STATUS
approved