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!)
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

Index entries for sequences related to sums of squares.

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.

License Agreements, Terms of Use, Privacy Policy. .

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