|
Search: id:A140113
|
|
|
| A140113 |
|
a(1)=1, a(n)=a(n-1)+n if n odd, a(n)=a(n-1)+ n^2 if n is even. |
|
+0
29
|
|
| 1, 5, 8, 24, 29, 65, 72, 136, 145, 245, 256, 400, 413, 609, 624, 880, 897, 1221, 1240, 1640, 1661, 2145, 2168, 2744, 2769, 3445, 3472, 4256, 4285, 5185, 5216, 6240, 6273, 7429, 7464, 8760, 8797, 10241, 10280, 11880, 11921, 13685, 13728, 15664, 15709
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
FORMULA
|
Ogf([1,5,8,24,29,65,72,136,145,245,256,400,413,609,624,880,897,1221,1240,1640,1661,21 45,2168,2744,2769,3445,3472,4256,4285,5185,5216,6240,6273,7429,7464,8760,8797,10241,10280,11880,11 921,13685,13728,15664,15709]) = (-x^4 + 4*x^3 + 4*x + 1)/(x^7 - x^6 - 3*x^5 + 3*x^4 + 3*x^3 - 3*x^2 - x + 1) - Alexander R. Povolotsky (pevnev(AT)juno.com), May 08 2008
a(n)=a(n-1)+{[1-(-1)^n]/2}+{[1+(-1)^n]/2}*n^4, with a(1)=1 a(n)=(1/8)-(1/8)*(-1)^n+(1/6)*n^3+(1/4)*(-1)^n*n^2+(1/2)*n^2+(1/3)*n, with n>=1 - Paolo P. Lava (ppl(AT)spl.at), Jun 06 2008
|
|
MATHEMATICA
|
a = {}; Do[k = 0; Do[k = k + (Sin[Pi m/2]^2) m + (Cos[Pi m/2]^2) m^2, {m, 1, n}]; AppendTo[a, k], {n, 1, 100}]; a (*Artur Jasinski*)
|
|
CROSSREFS
|
Cf. A136047.
Sequence in context: A092733 A116884 A105963 this_sequence A025623 A069959 A038250
Adjacent sequences: A140110 A140111 A140112 this_sequence A140114 A140115 A140116
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Artur Jasinski (grafix(AT)csl.pl), May 08 2008
|
|
|
Search completed in 0.002 seconds
|
