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

 

Logo

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 56th year, we are closing in on 350,000 sequences, and we’ve crossed 9,700 citations (which often say “discovered thanks to the OEIS”).

Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A000283 a(n) = a(n-1)^2 + a(n-2)^2 for n >= 2 with a(0) = 0 and a(1) = 1. 26
0, 1, 1, 2, 5, 29, 866, 750797, 563696885165, 317754178345286893212434, 100967717855888389973004846476977145423449281581 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,4

LINKS

Vincenzo Librandi, Table of n, a(n) for n = 0..14

Steven J. Miller (ed.), Benford's Law: Theory and Applications, Princeton University Press, 2015; see page 5.

FORMULA

a(0)=0; for n >= 1, a(n) = floor(A^(2^(n-1))), where

A=1.235392737785436889622331013228440824347457186913679454733601897236639743839118542826528455451978134... - Benoit Cloitre, May 03 2003

MAPLE

A000283 := proc(n) option remember; if n <= 1 then n else A000283(n-2)^2+A000283(n-1)^2; fi; end;

MATHEMATICA

Join[{a=0, b=1}, Table[c=a^2+b^2; a=b; b=c, {n, 12}]] (* Vladimir Joseph Stephan Orlovsky, Jan 22 2011 *)

RecurrenceTable[{a[n + 2] == a[n + 1]^2 + a[n]^2, a[0] == 0, a[1] == 1}, a, {n, 0, 12}] (* Emanuele Munarini, Mar 30 2017 *)

PROG

(PARI) {a(n) = if( n<2, n>0, a(n-1)^2 + a(n-2)^2)}; /* Michael Somos, Feb 10 2002 */

(Maxima) a(n) := if n=0 then 0 elseif n=1 then 1 else a(n-1)^2 + a(n-2)^2;

makelist(a(n), n, 0, 12); /* Emanuele Munarini, Mar 30 2017 */

CROSSREFS

Cf. A000278.

Sequence in context: A265773 A098717 A059784 * A121910 A073833 A229918

Adjacent sequences:  A000280 A000281 A000282 * A000284 A000285 A000286

KEYWORD

nonn,easy

AUTHOR

Stephen J. Greenfield (greenfie(AT)math.rutgers.edu)

EXTENSIONS

Name clarified by David A. Corneth, Jul 14 2018

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 December 7 13:08 EST 2021. Contains 349581 sequences. (Running on oeis4.)