|
Search: id:A131703
|
|
|
| A131703 |
|
a(n) = sum{k=1 to floor(sqrt(n))} floor(k*sqrt(n)). |
|
+0 1
|
|
| 1, 1, 1, 6, 6, 6, 7, 7, 18, 18, 18, 19, 20, 21, 21, 40, 40, 40, 42, 42, 44, 45, 46, 46, 75, 75, 75, 77, 78, 79, 81, 82, 83, 85, 85, 126, 126, 126, 128, 129, 132, 132, 135, 136, 138, 139, 141, 141, 196, 196, 196, 199, 200, 203, 204, 205, 208, 210, 212, 213, 215, 217, 217
(list; graph; listen)
|
|
|
OFFSET
|
1,4
|
|
|
MATHEMATICA
|
Table[Sum[Floor[k*Sqrt[n]], {k, 1, Floor[Sqrt[n]]}], {n, 1, 75}] - Stefan Steinerberger (stefan.steinerberger(AT)gmail.com), Sep 18 2007
|
|
CROSSREFS
|
Sequence in context: A054641 A024731 A098537 this_sequence A135357 A046264 A035019
Adjacent sequences: A131700 A131701 A131702 this_sequence A131704 A131705 A131706
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Leroy Quet (qq-quet(AT)mindspring.com), Sep 16 2007
|
|
EXTENSIONS
|
More terms from Stefan Steinerberger (stefan.steinerberger(AT)gmail.com), Sep 18 2007
|
|
|
Search completed in 0.002 seconds
|