OFFSET
1,1
COMMENTS
Conjecture: all terms are divisible by 18.
Conjecture: gcd(k, sigma(k)) is in {2,3}.
EXAMPLE
For k = 18: sigma(18) = 39 and gcd(18, 39) = 3, which is prime, so 18 is a term.
For k = 12: sigma(12) = 28 and gcd(12, 28) = 4, which is not prime, so 12 is not a term.
MATHEMATICA
Select[Array[Prime[#] + 1 &, 35000], PrimeQ[# + 1] && PrimeQ[GCD[#, DivisorSigma[1, #]]] &] (* Amiram Eldar, Mar 31 2026 *)
PROG
(Python)
from sympy import divisor_sigma, gcd, isprime
def ok(k): return isprime(k-1) and isprime(k+1) and isprime(gcd(k, divisor_sigma(k)))
print([k for k in range(1, 500000) if ok(k)])
CROSSREFS
KEYWORD
nonn
AUTHOR
Aied Sulaiman, Mar 31 2026
STATUS
approved
