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

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

Offset: 0

Author

N. J. A. Sloane

Keywords

• nonn

References

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

Links

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

Crossrefs

Column k=19 of A047969.

Programs

Magma

[(n+1)^20 - n^20: n in [0..20]]; // G. C. Greubel, Feb 27 2018

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 *)

PARI

for(n=0,20, print1((n+1)^20 - n^20, ", ")) \\ G. C. Greubel, Feb 27 2018

Formula

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

Extensions

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