A022540 Nexus numbers (n+1)^24 - n^24.
1, 16777215, 282412759265, 281192547174175, 59323169798679969, 4678776693546226271, 186842850042244797505, 4530785251489078799295, 75044076594002864649665, 920233556923127490136639, 8849732675807611094711841, 69647114527583233038729695, 463303923170979668638153825
Offset: 0
Keywords
References
- J. H. Conway and R. K. Guy, The Book of Numbers, Copernicus Press, NY, 1996, p. 54.
Links
- Harvey P. Dale, Table of n, a(n) for n = 0..1000
Programs
-
Magma
[(n+1)^24 - n^24: n in [0..20]]; // G. C. Greubel, Feb 27 2018
-
Maple
b:=24: a:=n->(n+1)^b-n^b: seq(a(n),n=0..18); # Muniru A Asiru, Feb 28 2018
-
Mathematica
Last[#]-First[#]&/@Partition[Range[0,10]^24,2,1] (* Harvey P. Dale, Apr 19 2014 *) Table[(n+1)^24 - n^24, {n,0,20}] (* G. C. Greubel, Feb 27 2018 *)
-
PARI
for(n=0,20, print1((n+1)^24 - n^24, ", ")) \\ G. C. Greubel, Feb 27 2018