login
A065767
Intersection of A065764 and A065765: n such that x and y exist with sigma[x^2] = n = sigma[2*(y^2)].
2
399, 5187, 12369, 34671, 48279, 73017, 80199, 122493, 152019, 160797, 220647, 259749, 311619, 347529, 396207, 436107, 561393, 687477, 755307, 900543, 949221, 1042587, 1074801, 1142337, 1412859, 1496649, 1509417, 1592409, 1818243
OFFSET
1,1
EXAMPLE
n = 399 = sigma[14^2] = sigma[2*(11^2)] = 1+2+4+7+14+28+49+98+196 = 1+2+11+22+121+242; also sigma[42.42] = sigma[2.33.33] = sigma[1764] = sigma[2378] = 5187.
MATHEMATICA
Intersection[Table[DivisorSigma[1, w^2], {w, 1, 10000}], Table[DivisorSigma[1, 2*(w^2)], {w, 1, 10000}]]
CROSSREFS
KEYWORD
nonn
AUTHOR
Labos Elemer, Nov 19 2001
STATUS
approved