

A102532


Imaginary part of absolute Gaussian perfect numbers, in order of increasing magnitude.


6



7, 42, 57, 82, 78, 189, 341, 549, 664, 1048, 1016, 3776, 4072, 1672, 5049, 3816, 1128, 368, 7097, 2504, 6816, 7912, 10743, 12605, 12606, 248, 10392, 16853, 15208, 20824, 344, 15688, 392, 18076, 1340, 22302, 5912, 1573, 24392, 21328, 24896, 7048, 1220, 29288, 9678
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,1


COMMENTS

See A102531 for the real part.


LINKS

Amiram Eldar, Table of n, a(n) for n = 1..76


MATHEMATICA

lst={}; nn=1000; Do[z=a+b*I; If[Abs[z]<=nn && Abs[(DivisorSigma[1, z]z)] == Abs[z], AppendTo[lst, {Abs[z]^2, z}]], {a, nn}, {b, nn}]; Im[Transpose[Sort[lst]][[2]]]


CROSSREFS

Cf. A102531, A102506, A102507, A101366, A101367.
Sequence in context: A290045 A188066 A225327 * A297405 A044109 A195320
Adjacent sequences: A102529 A102530 A102531 * A102533 A102534 A102535


KEYWORD

nonn


AUTHOR

T. D. Noe, Jan 13 2005


EXTENSIONS

a(22)a(45) from Amiram Eldar, Feb 10 2020


STATUS

approved



