A129958 First differences of A129957.

0, 8, 18, 38, 60, 92, 126, 170, 216, 272, 330, 398, 468, 548, 630, 722, 816, 920, 1026, 1142, 1260, 1388, 1518, 1658, 1800, 1952, 2106, 2270, 2436, 2612, 2790, 2978, 3168, 3368, 3570, 3782, 3996, 4220, 4446, 4682, 4920

Offset

0,2

Links

Table of n, a(n) for n=0..40.

Mathematica

f[n_] := If[Mod[n, 2] == 0, n^3 + 1, n^3]; Table[f[n + 1] - f[n], {n, 0, 40}]
Differences[Table[If[OddQ[n], n^3, n^3+1], {n, 0, 50}]] (* Harvey P. Dale, Aug 26 2012 *)

Crossrefs

Cf. A129957, A129959.

Sequence in context: A211528 A297841 A098944 * A082227 A134062 A251251

Adjacent sequences: A129955 A129956 A129957 * A129959 A129960 A129961

Keyword

nonn

Author

Roger L. Bagula, Jun 10 2007

Extensions

Edited, corrected and extended by Stefan Steinerberger, Jul 21 2007

Status

approved