A090664 a(n) = n-th term of the continued fraction for the n-th root of n.

2, 3, 2, 1, 9, 4, 2, 5, 3, 1, 14, 27, 5, 1, 1, 3, 5, 2, 1, 7, 2, 1, 4, 1, 10, 5, 56, 2, 1, 3, 36, 3, 1, 3, 9, 7, 8, 8, 1, 4, 1, 2, 60, 1, 1, 684, 2, 11, 1, 1, 2, 1, 2, 4, 2, 7, 5, 9, 1, 3, 5, 5, 1, 14, 3, 1, 1, 9, 1, 3, 5, 8, 30, 1, 2, 2, 3, 1, 1, 1, 5, 3, 2, 23, 2, 1, 31, 1, 2, 1, 1, 7, 1, 1, 3, 1, 1, 5, 6

Offset

2,1

Links

Table of n, a(n) for n=2..100.

Mathematica

Table[ContinuedFraction[Surd[n, n], n+25][[n]], {n, 2, 100}] (* Harvey P. Dale, Jan 28 2023 *)

Prog

(PARI) f(n) = for(x=2, n, a=contfrac(x^(1/x)); print1(a[x]", "))

Crossrefs

Sequence in context: A062323 A291087 A020858 * A086764 A375089 A255010

Adjacent sequences: A090661 A090662 A090663 * A090665 A090666 A090667

Keyword

nonn

Author

Cino Hilliard, Dec 15 2003

Status

approved