A109595 n^3 followed by n^2 followed by n.
1, 1, 1, 8, 4, 2, 27, 9, 3, 64, 16, 4, 125, 25, 5, 216, 36, 6, 343, 49, 7, 512, 64, 8, 729, 81, 9, 1000, 100, 10, 1331, 121, 11, 1728, 144, 12, 2197, 169, 13, 2744, 196, 14, 3375, 225, 15, 4096, 256, 16, 4913, 289, 17, 5832, 324, 18, 6859, 361, 19, 8000, 400, 20
Offset: 1
Keywords
Links
- Index entries for linear recurrences with constant coefficients, signature (0, 0, 4, 0, 0, -6, 0, 0, 4, 0, 0, -1).
Programs
-
Mathematica
Flatten[Table[{n^3,n^2,n},{n,20}]] (* or *) LinearRecurrence[{0,0,4,0,0,-6,0,0,4,0,0,-1},{1,1,1,8,4,2,27,9,3,64,16,4},60] (* Harvey P. Dale, Aug 22 2014 *)
Formula
a(n) = floor((n+2)/3)^((-3*(n mod 3)^2+7*(n mod 3)+2)/2). - Luce ETIENNE, Mar 01 2018