A220509 n^3 + 3n + 3^n.
1, 7, 23, 63, 157, 383, 963, 2551, 7097, 20439, 60079, 178511, 533205, 1596559, 4785755, 14352327, 43050865, 129145127, 387426375, 1162268383, 3486792461, 10460362527, 31381070323, 94143191063, 282429550377, 847288625143, 2541865845983, 7625597504751
Offset: 0
Examples
a(1) = 1^3 + 3*1 + 3^1 = 7. a(2) = 2^3 + 3*2 + 3^2 = 23.
Links
- Vincenzo Librandi, Table of n, a(n) for n = 0..1000
Programs
-
Magma
[n^3 + 3*n + 3^n: n in [0..30]]; // Vincenzo Librandi, Dec 18 2012
-
Mathematica
Table[n^3 + 3*n + 3^n, {n, 0, 30}] (* T. D. Noe, Dec 17 2012 *) CoefficientList[Series[(1 - 8*x^2 + 6*x^3 - 11*x^4)/((1-x)^4*(1-3x)), {x, 0, 40}], x] (* Vincenzo Librandi, Dec 18 2012 *) -
Maxima
A220509(n):=n^3+3*n+3^n$ makelist(A220509(n),n,0,20); /* Martin Ettl, Dec 17 2012 */
Formula
G.f.: (1 - 8*x^2 + 6*x^3 - 11*x^4)/((1-x)^4*(1-3*x)). - Vincenzo Librandi, Dec 18 2012
Comments