A022535 Nexus numbers (n+1)^19 - n^19.
1, 524287, 1161737179, 273715645477, 18798608421181, 590286253682371, 10789535445362647, 132716292890482729, 1206736529597136217, 8649148282327007911, 51159090448414546291, 258320908922208380557, 1142440291004823183829, 4514383668573468286507, 16192074241582091462191
Offset: 0
References
- J. H. Conway and R. K. Guy, The Book of Numbers, Copernicus Press, NY, 1996, p. 54.
Links
- Vincenzo Librandi, Table of n, a(n) for n = 0..10000
Programs
-
Magma
[(n+1)^19-n^19: n in [0..20]]; // Vincenzo Librandi, Nov 22 2011
-
Maple
b:=19: a:=n->(n+1)^b-n^b: seq(a(n),n=0..18); # Muniru A Asiru, Feb 28 2018
-
Mathematica
Table[(n+1)^19-n^19,{n,0,20}] (* Vincenzo Librandi, Nov 22 2011 *)
-
PARI
for(n=0,20, print1((n+1)^19 - n^19, ", ")) \\ G. C. Greubel, Feb 27 2018
Formula
Extensions
More terms added by G. C. Greubel, Feb 27 2018