A215615 From Wendt's determinant compute sqrt(abs(A048954(n))/(2^n - 1)).

1, 1, 2, 5, 11, 0, 232, 2295, 26714, 453871, 7053157, 0, 7715707299, 545539395584, 42297694603648, 4883188189089105, 531361846217471443, 0, 28649272821614715410221, 14214363393075742724609375, 7526219790642312236217153392, 5968603205606800870499639536231

Offset

1,3

Comments

E. Lehmer claimed, and J. S. Frame proved, that a(n) is an integer (Ribenboim 1999, p. 128).

The subsequence for even n is A129205.

See A048954 for additional comments, references, links, and cross-references.

References

P. Ribenboim, Fermat's Last Theorem for Amateurs, Springer-Verlag, NY, 1999, pp. 126, 136.

Links

Table of n, a(n) for n=1..22.

Formula

a(n) = ((-1)^(n-1)*A048954(n)/(2^n - 1))^(1/2).

Mathematica

w[n_] := Resultant[x^n - 1, (1 + x)^n - 1, x]; Table[ Sqrt[Abs[w[n]]/(2^n - 1)], {n, 25}]

Crossrefs

Cf. A048954, A129205, A215616.

Sequence in context: A342612 A342490 A163784 * A018862 A394737 A332009

Adjacent sequences: A215612 A215613 A215614 * A215616 A215617 A215618

Keyword

nonn

Author

Jonathan Sondow, Aug 17 2012

Status

approved