|
| |
|
|
A023678
|
|
y values corresponding to the x-values in A023677.
|
|
2
| |
|
|
1, 1, 1, 2, 3, 1, 3, 1, 4, 1, 1, 39, 1, 42, 5, 1, 1, 2, 273, 4, 6, 1, 1, 6, 4, 5, 2, 531, 3588, 7, 7, 1, 12, 20, 13, 69, 5, 8, 1, 8, 5967, 3, 30, 413, 125, 5, 1, 6, 9, 1, 9, 1, 1122, 3, 53, 165, 3, 221064, 4, 569, 1, 10, 22419, 4, 389, 93, 25, 2, 28, 73, 96, 105, 28254
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,4
|
|
|
REFERENCES
| M. Pohst and H. Zassenhaus, Algorithmic Algebraic Number Theory, Cambridge Univ. Press, 1989, p. 432.
|
|
|
LINKS
| A. Jasinski, Table of n, a(n) for n=1..10000
|
|
|
MATHEMATICA
| aa = {}; bb = {}; w = 0; n = 2; While[w < 100, If[SquareFreeQ[n], w = w + 1; kk = Exp[NumberFieldRegulator[Sqrt[n]]]; If[kk[[1]] == 1/2, kk = Expand[2 kk]]; AppendTo[aa, kk[[1]]]; AppendTo[bb, kk[[2]]/Sqrt[n]]]; n++ ]; bb (*Artur Jasinski*)
|
|
|
CROSSREFS
| Cf. A023677.
Sequence in context: A134411 A126044 A114899 * A128222 A057039 A135511
Adjacent sequences: A023675 A023676 A023677 * A023679 A023680 A023681
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| N. J. A. Sloane (njas(AT)research.att.com).
|
|
|
EXTENSIONS
| Better definition from Artur Jasinski, Oct 23 2010
|
| |
|
|
