A115558 a(n) is the square root of A115557(n).
1, 7, 11, 13, 19, 23, 29, 31, 43, 47, 53, 73, 83, 97, 103, 113, 127, 157, 179, 197, 199, 223, 227, 233, 239, 241, 251, 257, 271, 281, 311, 316, 317, 333, 353, 389, 401, 409, 419, 421, 443, 449, 461, 467, 479, 491, 503, 509, 549, 563, 587, 593, 599, 617, 641
Offset: 1
Keywords
Links
- Giovanni Resta, Table of n, a(n) for n = 1..10000
Programs
-
Mathematica
Select[Range[1000], DivisorSigma[0, DivisorSigma[1, #^2]] == DivisorSigma[1, DivisorSigma[0, #^2]] &] (* Amiram Eldar, Jan 28 2025 *)
-
PARI
isok(k) = numdiv(sigma(k^2)) == sigma(numdiv(k^2)); \\ Amiram Eldar, Jan 28 2025
Formula
The commutator [sigma, tau] is zero and a(n) is the square root of solutions. Both prime and composite numbers.