login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A036246 CONTINUANT transform of squares 1, 4, 9, ... 7
1, 5, 46, 741, 18571, 669297, 32814124, 2100773233, 170195445997, 17021645372933, 2059789285570890, 296626678767581093, 50131968501006775607, 9826162452876095600065, 2210936683865622516790232, 566009617232052240393899457, 163578990316746963096353733305 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,2

COMMENTS

Denominator of fraction equal to the continued fraction [ 0, 1, 4, ...n^2 ].

LINKS

Alois P. Heinz, Table of n, a(n) for n = 1..100

N. J. A. Sloane, Transforms

FORMULA

a(n) ~  c * n^(2*n + 1) / exp(2*n), where c = 8.1245591771139376779472290412302409841950717664641832772206241208918274428499... - Vaclav Kotesovec, Jun 05 2018

From Jianing Song, Nov 30 2019: (Start)

a(n) = n^2 * a(n-1) + a(n-2) for n > 2.

Lim_{n->oo} A036245(n)/a(n) = A073824. (End)

MAPLE

a:= proc(n) option remember; `if`(n<0, 0,

      `if`(n=0, 1, n^2 *a(n-1) +a(n-2)))

    end:

seq(a(n), n=1..20);  # Alois P. Heinz, Aug 06 2013

MATHEMATICA

Table[Denominator[FromContinuedFraction[Range[0, n]^2]], {n, 20}] (* Harvey P. Dale, Jul 16 2017 *)

PROG

(PARI) A036246(n) = my(v=vector(n+1)); for(i=1, n+1, if(i==1, v[i]=1, if(i==2, v[i]=1, v[i]=(i-1)^2*v[i-1]+v[i-2]))); v[n+1] \\ Jianing Song, Nov 30 2019

CROSSREFS

Cf. A036245, A073824.

Sequence in context: A292408 A295552 A066998 * A183240 A299715 A000872

Adjacent sequences:  A036243 A036244 A036245 * A036247 A036248 A036249

KEYWORD

frac,nonn

AUTHOR

Jeff Burch

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified July 11 08:10 EDT 2020. Contains 335626 sequences. (Running on oeis4.)