login
A076997
a(1) = 1, a(n+1) is the largest square <= n*a(n).
1
1, 1, 1, 1, 4, 16, 81, 529, 4225, 38025, 379456, 4173849, 50083929, 651066256, 9114902784, 136723197121, 2187571153936, 37188701848516, 669396605290000, 12718535343402256, 254370705884725824, 5341784820136403409
OFFSET
1,5
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..451 (terms below 10^1000)
MAPLE
a[1] := 1:for i from 2 to 65 do a[i] := (floor(evalf(sqrt((i-1)*a[i-1]+1/10^120), 200)))^2:od:seq(a[i], i=1..65);
MATHEMATICA
a[1] = 1; a[n_] := a[n] = Floor[Sqrt[(n-1)*a[n-1]]]^2; Array[a, 22] (* Amiram Eldar, Sep 24 2023 *)
CROSSREFS
Cf. A076998.
Sequence in context: A133053 A342326 A110378 * A092304 A356297 A204066
KEYWORD
nonn
AUTHOR
Amarnath Murthy, Oct 26 2002
EXTENSIONS
Corrected and extended by Sascha Kurz, Jan 26 2003
STATUS
approved