A022536 Nexus numbers (n+1)^20 - n^20.

1, 1048575, 3485735825, 1096024843375, 94267920012849, 3560791008422351, 76136107857549025, 1073129238309234975, 11004743954450081825, 87842334540943071199, 572749994932560009201, 3161009997514915112975, 15171203782433324316625, 64663291650404002121775, 248857417582680286330049

Offset

0,2

References

J. H. Conway and R. K. Guy, The Book of Numbers, Copernicus Press, NY, 1996, p. 54.

Elena Deza and Michel Marie Deza, Figurate numbers, World Scientific Publishing (2012), page 206.

Links

G. C. Greubel, Table of n, a(n) for n = 0..10000

Index entries for linear recurrences with constant coefficients, signature (20, -190, 1140, -4845, 15504, -38760, 77520, -125970, 167960, -184756, 167960, -125970, 77520, -38760, 15504, -4845, 1140, -190, 20, -1).

Formula

a(n) = A010808(n+1) - A010808(n). - Sean A. Irvine, May 18 2019

Maple

b:=20: a:=n->(n+1)^b-n^b: seq(a(n), n=0..18); # Muniru A Asiru, Feb 28 2018

Mathematica

Table[(n+1)^20 - n^20, {n, 0, 20}] (* G. C. Greubel, Feb 27 2018 *)

Prog

(PARI) for(n=0, 20, print1((n+1)^20 - n^20, ", ")) \\ G. C. Greubel, Feb 27 2018
(Magma) [(n+1)^20 - n^20: n in [0..20]]; // G. C. Greubel, Feb 27 2018

Crossrefs

Column k=19 of A047969.

Sequence in context: A075976 A075977 A011570 * A069395 A223603 A223696

Adjacent sequences: A022533 A022534 A022535 * A022537 A022538 A022539

Keyword

nonn,easy

Author

N. J. A. Sloane

Extensions

More terms added by G. C. Greubel, Feb 27 2018

Status

approved