OFFSET
1,1
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..5000
FORMULA
EXAMPLE
Second term of A065061 is 8 and sigma(8) - tau(8) = 15 - 4 = 11 is prime.
MAPLE
with(numtheory); P:=proc(q) local a, n; a:= sigma(n)-tau(n); for n from 1 to q do
if isprime(a) then print(a); fi; od; end: P(10^6);
MATHEMATICA
Join[{2}, Select[(DivisorSigma[1, #] - DivisorSigma[0, #]) & /@ (2*Range[20000]^2), PrimeQ]] (* Amiram Eldar, Dec 06 2022 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Paolo P. Lava, Sep 18 2013
EXTENSIONS
More terms from Michel Marcus, Sep 21 2013
STATUS
approved