Search: gaussian amicable
|
| |
|
|
A102924
|
|
Real part of Gaussian amicable numbers in order of increasing magnitude. See A102925 for the imaginary part.
|
|
+40
1
|
|
|
|
-1105, -1895, -2639, -3235, -3433, -3970, -4694, -3549, -766, -4478, -6880, 5356, -6468, 8008, 4232, -8547
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
1,1
|
|
|
COMMENTS
|
For a Gaussian integer z, let the sum of the proper divisors be denoted by s(z) = sigma(z)-z, where sigma(z) is sum of the divisors of z, as defined by Spira for Gaussian integers. Then z is an amicable Gaussian number if z and s(z) are different and z = s(s(z)). The smallest Gaussian amicable number in the first quadrant is 8008+3960i.
|
|
|
LINKS
|
|
|
|
EXAMPLE
|
For z=-1105+1020i, we have s(z)=-2639-1228i and s(s(z))=z.
|
|
|
MATHEMATICA
|
s[z_Complex] := DivisorSigma[1, z]-z; nn=10000; lst={}; Do[d=a^2+b^2; If[d<nn^2, z=a+b*I; Do[If[s[s[z]]==z, AppendTo[lst, {d, z}]]; z=z*I, {4}]], {a, nn}, {b, nn}]; Re[Transpose[Sort[lst]][[2]]]
|
|
|
CROSSREFS
|
Cf. A102506 (Gaussian multiperfect numbers), A102531 (absolute Gaussian perfect numbers).
|
|
|
KEYWORD
|
sign,more
|
|
|
AUTHOR
|
|
|
|
STATUS
|
approved
|
| |
|
|
| |
|
|
A102925
|
|
Imaginary part of Gaussian amicable numbers in order of increasing magnitude. See A102924 for the real part.
|
|
+40
1
|
|
|
|
1020, 2060, -1228, 1020, -2356, 2435, 467, -4988, -6187, -5471, 4275, -6133, -5251, 3960, -8280, 4606
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
1,1
|
|
|
LINKS
|
|
|
|
MATHEMATICA
|
s[z_Complex] := DivisorSigma[1, z]-z; nn=10000; lst={}; Do[d=a^2+b^2; If[d<nn^2, z=a+b*I; Do[If[s[s[z]]==z, AppendTo[lst, {d, z}]]; z=z*I, {4}]], {a, nn}, {b, nn}]; Im[Transpose[Sort[lst]][[2]]]
|
|
|
KEYWORD
|
sign
|
|
|
AUTHOR
|
|
|
|
STATUS
|
approved
|
| |
|
|
| |
|
|
A354070
|
|
Lesser of an amicable pair in which both members are divisible only by primes congruent to 3 (mod 4).
|
|
+30
2
|
|
|
|
294706414233, 518129600373, 749347913853, 920163589191, 1692477265941, 2808347861781, 3959417614383, 4400950312143, 9190625896683, 10694894578137, 12615883061859, 15028451404659, 18971047742031, 21981625463259, 29768959571967, 37423211019579, 54939420064683, 69202873206621
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
1,1
|
|
|
COMMENTS
|
Since the factorization of numbers that are divisible only by primes congruent to 3 (mod 4) is the same also in Gaussian integers, these pairs are also Gaussian amicable pairs.
There are 4197267 lesser members of amicable pairs below 10^20 and only 1565 are in this sequence.
The least pair, (294706414233, 305961592167), was discovered by Herman J. J. te Riele in 1995.
The larger counterparts are in A354071.
|
|
|
LINKS
|
Patrick Costello and Ranthony A. C. Edmonds, Gaussian Amicable Pairs, Missouri Journal of Mathematical Sciences, Vol. 30, No. 2 (2018), pp. 107-116.
|
|
|
EXAMPLE
|
294706414233 is a term since (294706414233, 305961592167) is an amicable pair: A001065(294706414233) = 305961592167 and A001065(305961592167) = 294706414233, 294706414233 = 3^4 * 7^2 * 11 * 19 * 47 * 7559, and 3, 7, 11, 19, 47 and 7559 are all congruent to 3 (mod 4), and 305961592167 = 3^4 * 7 * 11 * 19 * 971 * 2659, and 3, 7, 11, 19, 971 and 2659 are all congruent to 3 (mod 4).
|
|
|
CROSSREFS
|
|
|
|
KEYWORD
|
nonn
|
|
|
AUTHOR
|
|
|
|
STATUS
|
approved
|
| |
|
Search completed in 0.012 seconds
|