This site is supported by donations to The OEIS Foundation.

Thanks to everyone who made a donation during our annual appeal!
To see the list of donors, or make a donation, see the OEIS Foundation home page.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A164576 Integer averages of the set of the first positive squares up to some n^2. 7
 1, 11, 20, 46, 63, 105, 130, 188, 221, 295, 336, 426, 475, 581, 638, 760, 825, 963, 1036, 1190, 1271, 1441, 1530, 1716, 1813, 2015, 2120, 2338, 2451, 2685, 2806, 3056, 3185, 3451, 3588, 3870, 4015, 4313, 4466, 4780, 4941, 5271, 5440, 5786, 5963, 6325, 6510 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,2 COMMENTS Integers of the form A000330(k)/k, k listed in A007310. - R. J. Mathar, Aug 20 2009 LINKS Zak Seidov, Table of n, a(n) for n = 1..1000 Index entries for linear recurrences with constant coefficients, signature (1,2,-2,-1,1). FORMULA a(n) = A000330(A007310(n)) / A007310(n) = A175485(A007310(n)). - Jaroslav Krizek, May 28 2010 G.f. ( -x*(1+10*x+7*x^2+6*x^3) ) / ( (1+x)^2*(x-1)^3 ). - R. J. Mathar, Jan 25 2011 a(n) = 1/4*(12*n^2 - 6*n + (-1)^n*(4*n-1) + 1). - Colin Barker, Dec 26 2015 EXAMPLE a(1) = 1^2/1 is integer. The average of the first two squares is (1^2+2^2)/2=5/2, not integer. The average of the first three squares is (1^2+2^2+3^2)/3=14/3, not integer. The average of the first five squares is (1^2+2^2+3^2+4^2+5^2)/ 5=11, integer, and constitutes a(2). MATHEMATICA s=0; lst={}; Do[a=(s+=n^2)/n; If[Mod[a, 1]==0, AppendTo[lst, a]], {n, 6!}]; lst Flatten[Table[{(1 + 3 k) (1 + 4 k), (1 + k) (11 + 12 k)}, {k, 0, 499}]] (* Zak Seidov, Aug 15 2012 *) Module[{nn=150, sq}, sq=Range[nn]^2; Select[Table[Mean[Take[sq, n]], {n, nn}], IntegerQ]] (* or *) LinearRecurrence[{1, 2, -2, -1, 1}, {1, 11, 20, 46, 63}, 50] (* Harvey P. Dale, Oct 31 2013 *) PROG (PARI) a(n) = 1/4*(12*n^2 - 6*n + (-1)^n*(4*n-1) + 1) \\ Colin Barker, Dec 26 2015 CROSSREFS Cf. A050248, A078617, A154293. Sequence in context: A158235 A158245 A076851 * A058497 A134782 A067969 Adjacent sequences:  A164573 A164574 A164575 * A164577 A164578 A164579 KEYWORD nonn,easy AUTHOR Vladimir Joseph Stephan Orlovsky, Aug 16 2009 EXTENSIONS Edited by R. J. Mathar, Aug 20 2009 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 January 20 02:50 EST 2019. Contains 319322 sequences. (Running on oeis4.)