A185592 a(n) = floor(n^(3/2))*floor(1 + n^(3/2))*floor(2 + n^(3/2))/6.

1, 4, 35, 120, 286, 560, 1140, 2024, 3654, 5456, 8436, 12341, 17296, 24804, 34220, 45760, 59640, 76076, 95284, 121485, 152096, 187460, 227920, 273819, 333375, 392084, 467180, 551300, 644956, 748660, 862924, 1004731, 1143135, 1313400, 1499784, 1703016, 1923825, 2162940, 2421090, 2699004, 3031864, 3391024, 3737581, 4149466, 4590551, 5061836, 5616324

Offset

1,2

Comments

A subsequence of A000292.

Links

Vincenzo Librandi, Table of n, a(n) for n = 1..10000

Mathematica

Table[Floor[n^(3/2)]*Floor[n^(3/2)+1]*Floor[n^(3/2)+2]/6, {n, 1, 80}]
Table[(Times@@Floor[Sqrt[n]^3+{0, 1, 2}])/6, {n, 80}] (* Harvey P. Dale, Nov 16 2024 *)

Prog

(Magma) [Floor(n^(3/2))*Floor(n^(3/2)+1)*Floor(n^(3/2)+2)/6: n in [1..60]]; // Vincenzo Librandi, Sep 13 2011
(PARI) for(n=1, 50, print1(floor(n^(3/2))*floor(1+n^(3/2))*floor(2+n^(3/2))/6, ", ")) \\ G. C. Greubel, Jul 08 2017
(PARI) a(n) = my(f=sqrtnint(n^3, 2)); f*(f+1)*(f+2)/6; \\ Michel Marcus, Jul 08 2017

Crossrefs

Cf. A000292.

Sequence in context: A211612 A068968 A228887 * A296280 A011195 A025195

Adjacent sequences: A185589 A185590 A185591 * A185593 A185594 A185595

Keyword

nonn

Author

Clark Kimberling, Jan 31 2011

Status

approved