|
| |
|
|
A086849
|
|
Sum of first n nonsquares.
|
|
1
| |
|
|
2, 5, 10, 16, 23, 31, 41, 52, 64, 77, 91, 106, 123, 141, 160, 180, 201, 223, 246, 270, 296, 323, 351, 380, 410, 441, 473, 506, 540, 575, 612, 650, 689, 729, 770, 812, 855, 899, 944, 990, 1037, 1085, 1135, 1186, 1238, 1291, 1345, 1400, 1456, 1513, 1571, 1630
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
COMMENTS
| a(n) = A000217(A000037(n)) - A000330(A000196(A000037(n))).
|
|
|
FORMULA
| a(n) = A000217(A000037(n)) - A000330(A000196(A000037(n))). a(n) = SUM[from i = 1 to n] A000037(i). a(n) = SUM[from i = 1 to n] (i + [1/2 + sqrt(i)]) where [x] = floor(x). a(n) = A000217(A000037(n)) -(1/3)*(2*A000196(n)+1)*A000217(A000196(A000037(n))). - Jonathan Vos Post (jvospost3(AT)gmail.com), Aug 28 2005
a(n) = [1/2 + (n+sqrt(n))*(n/2+sqrt(n)/6+1/3) - ([1/2 + sqrt(n)]-sqrt(n))^2*sqrt(n)] - Graeme McRae (g_m(AT)mcraefamily.com), Aug 28 2007
|
|
|
MATHEMATICA
| Accumulate[Table[n + Round[Sqrt[n]], {n, 120}]] (* From Vladimir Joseph Stephan Orlovsky, Jul 08 2011 *)
|
|
|
CROSSREFS
| Cf. A000037, A000196, A000217, A000330.
Sequence in context: A117582 A002134 A062472 * A131938 A031871 A026056
Adjacent sequences: A086846 A086847 A086848 * A086850 A086851 A086852
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Reinhard Zumkeller (reinhard.zumkeller(AT)gmail.com), Aug 18 2003
|
| |
|
|
