|
|
A037449
|
|
Discriminant of quadratic field Q(sqrt(n)).
|
|
9
|
|
|
1, 8, 12, 1, 5, 24, 28, 8, 1, 40, 44, 12, 13, 56, 60, 1, 17, 8, 76, 5, 21, 88, 92, 24, 1, 104, 12, 28, 29, 120, 124, 8, 33, 136, 140, 1, 37, 152, 156, 40, 41, 168, 172, 44, 5, 184, 188, 12, 1, 8, 204, 13, 53, 24, 220, 56, 57, 232, 236, 60, 61, 248, 28, 1, 65, 264, 268, 17, 69
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
For the discriminant of the quadratic field Q(sqrt(-n)), see A204993.
|
|
LINKS
|
|
|
MATHEMATICA
|
Table[NumberFieldDiscriminant[Sqrt[n]], {n, 100}] (* Artur Jasinski, Jan 27 2012 *)
|
|
PROG
|
(PARI) vector(150, n, quaddisc(n))
(Sage)
[fundamental_discriminant(n) for n in (1..69)] # Peter Luschny, Oct 15 2018
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|