A204993 Negative of the discriminant of quadratic field Q(sqrt(-n)).
4, 8, 3, 4, 20, 24, 7, 8, 4, 40, 11, 3, 52, 56, 15, 4, 68, 8, 19, 20, 84, 88, 23, 24, 4, 104, 3, 7, 116, 120, 31, 8, 132, 136, 35, 4, 148, 152, 39, 40, 164, 168, 43, 11, 20, 184, 47, 3, 4, 8, 51, 52, 212, 24, 55, 56, 228, 232, 59, 15, 244, 248, 7, 4, 260
Offset: 1
Programs
-
Mathematica
-Table[NumberFieldDiscriminant[Sqrt[-n]], {n, 1, 70}]
-
PARI
a(n) = -quaddisc(-n) \\ Jianing Song, May 16 2024
Formula
Let b(n) = A007913(n), then a(n) = b(n) if b(n) == 3 (mod 4) and 4*b(n) otherwise. - Jianing Song, May 16 2024
Comments