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

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A101135 a(1)=1. a(n) = a(n-1) + sum of the squares which are among the first (n-1) terms of the sequence. 6
 1, 2, 3, 4, 9, 23, 37, 51, 65, 79, 93, 107, 121, 256, 647, 1038, 1429, 1820, 2211, 2602, 2993, 3384, 3775, 4166, 4557, 4948, 5339, 5730, 6121, 6512, 6903, 7294, 7685, 8076, 8467, 8858, 9249, 9640, 10031, 10422, 10813, 11204, 11595, 11986, 12377, 12768 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,2 LINKS Colin Barker, Table of n, a(n) for n = 1..1000 MATHEMATICA Block[{a = {1}}, Do[AppendTo[a, a[[n - 1]] + Total@ Select[a, IntegerQ@ Sqrt@ # &]], {n, 2, 46}]; a] (* Michael De Vlieger, Aug 16 2017 *) PROG (PARI) vector(100, n, if(n==1, a_n_1=sum_=1, a_n_1+=sum_; if(ispolygonal(a_n_1, 4), sum_+=a_n_1)); a_n_1) \\ Colin Barker, Feb 20 2015 CROSSREFS Cf. A097602. Cf. A131093. Sequence in context: A192988 A280016 A122534 * A280054 A088220 A085612 Adjacent sequences:  A101132 A101133 A101134 * A101136 A101137 A101138 KEYWORD nonn AUTHOR Leroy Quet, Jun 07 2007 EXTENSIONS More terms from Reinhard Zumkeller, Jun 14 2007 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.

Last modified February 28 01:38 EST 2020. Contains 332319 sequences. (Running on oeis4.)