login
A116033
Numbers k such that sigma(k) plus the k-th prime is a prime.
2
1, 5, 10, 11, 14, 15, 20, 23, 24, 28, 29, 34, 35, 38, 39, 40, 42, 44, 46, 48, 52, 56, 57, 59, 60, 62, 65, 66, 68, 69, 74, 75, 76, 82, 85, 87, 92, 95, 97, 102, 106, 109, 114, 118, 119, 120, 122, 124, 126, 133, 136, 137, 139, 143, 145, 146, 148, 149, 152, 153, 156
OFFSET
1,2
LINKS
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
Cf. A116034.
Sequence in context: A004748 A038030 A094016 * A290469 A375320 A140507
KEYWORD
nonn
AUTHOR
Giovanni Resta, Feb 13 2006
STATUS
approved