OFFSET
1,2
LINKS
Alexander Violette, Table of n, a(n) for n = 1..104
Wikipedia, Divisor function.
EXAMPLE
65's divisors are 1, 5, 13, and 65. Since (1^2+5^2+13^2+65^2)/65 is an integer, 65 is in this sequence.
MATHEMATICA
Select[Range[1, 4000000, 2], Divisible[DivisorSigma[2, #], #] &] (* Amiram Eldar, Jun 03 2026 *)
PROG
(PARI) isok(k) = (k%2) && (denominator(sigma(k, 2)/k) == 1); \\ Michel Marcus, Jun 03 2026
CROSSREFS
KEYWORD
nonn
AUTHOR
Alexander Violette, May 30 2026
STATUS
approved
