A022530
Nexus numbers (n+1)^14 - n^14.
Original entry on oeis.org
1, 16383, 4766585, 263652487, 5835080169, 72260648471, 599858908753, 3719823438255, 18478745943857, 77123207545039, 279749833583241, 904168630965623, 2653457921150425, 7174630439858727, 18080919199832609, 42864668012537311, 96320232521472993, 206435541022680095
Offset: 0
- J. H. Conway and R. K. Guy, The Book of Numbers, Copernicus Press, NY, 1996, p. 54.
-
[(n+1)^14 - n^14: n in [0..20]]; // G. C. Greubel, Feb 27 2018
-
b:=14: a:=n->(n+1)^b-n^b: seq(a(n),n=0..18); # Muniru A Asiru, Feb 28 2018
-
Last[#]-First[#]&/@Partition[Range[0,20]^14,2,1] (* Harvey P. Dale, Oct 04 2011 *)
Table[(n+1)^14 - n^14, {n,0,20}] (* G. C. Greubel, Feb 27 2018 *)
-
for(n=0,20, print1((n+1)^14 - n^14, ", ")) \\ G. C. Greubel, Feb 27 2018
A022531
Nexus numbers (n+1)^15 - n^15.
Original entry on oeis.org
1, 32767, 14316139, 1059392917, 29443836301, 439667406451, 4277376525367, 30436810578889, 170706760005817, 794108867905351, 3177248169415651, 11229773405170717, 35778871439504389, 104382202543721467, 282325794823047151, 715027614225987601, 1709501546902968817
Offset: 0
- John H. Conway and Richard K. Guy, The Book of Numbers, Copernicus Press, NY, 1996, p. 54.
-
[(n+1)^15-n^15: n in [0..20]]; // Vincenzo Librandi, Nov 22 2011
-
b:=15: a:=n->(n+1)^b-n^b: seq(a(n),n=0..18); # Muniru A Asiru, Feb 28 2018
-
Table[(n + 1)^15 - n^15, {n, 0, 20}] (* Vincenzo Librandi, Nov 22 2011 *)
#[[2]]-#[[1]]&/@Partition[Range[0,20]^15,2,1] (* Harvey P. Dale, Aug 07 2022 *)
-
for(n=0,20, print1((n+1)^15 - n^15, ", ")) \\ G. C. Greubel, Feb 27 2018
A022532
Nexus numbers (n+1)^16-n^16.
Original entry on oeis.org
1, 65535, 42981185, 4251920575, 148292923329, 2668522016831, 30411820662145, 248242046141055, 1571545212141185, 8146979811148159, 35949729863572161, 138934529031464255, 480532350288143425, 1512536728626191295, 4390455017903519489, 11878335717996660991
Offset: 0
- J. H. Conway and R. K. Guy, The Book of Numbers, Copernicus Press, NY, 1996, p. 54.
-
[(n+1)^16-n^16: n in [0..20]]; // Vincenzo Librandi, Nov 22 2011
-
b:=16: a:=n->(n+1)^b-n^b: seq(a(n),n=0..18); # Muniru A Asiru, Feb 28 2018
-
Table[(n+1)^16-n^16,{n,0,20}] (* Vincenzo Librandi, Nov 22 2011 *)
-
for(n=0,20, print1((n+1)^16 - n^16, ", ")) \\ G. C. Greubel, Feb 27 2018
A022533
Nexus numbers (n+1)^17 - n^17.
Original entry on oeis.org
1, 131071, 129009091, 17050729021, 745759583941, 16163719991611, 215703854542471, 2019169299698041, 14425381885981321, 83322818300333431, 405447028499293771, 1713164078241143221, 6431804812640900941, 21840930809949857971, 68034778606362163471, 196621779843659466481
Offset: 0
- J. H. Conway and R. K. Guy, The Book of Numbers, Copernicus Press, NY, 1996, p. 54.
-
[(n+1)^17-n^17: n in [0..20]]; // Vincenzo Librandi, Nov 22 2011
-
b:=17: a:=n->(n+1)^b-n^b: seq(a(n),n=0..18); # Muniru A Asiru, Feb 28 2018
-
Table[(n+1)^17-n^17,{n,0,20}] (* Vincenzo Librandi, Nov 22 2011 *)
Differences[Range[0,20]^17] (* Harvey P. Dale, May 21 2019 *)
-
for(n=0,20, print1((n+1)^17 - n^17, ", ")) \\ G. C. Greubel, Feb 27 2018
A022534
Nexus numbers (n+1)^18 - n^18.
Original entry on oeis.org
1, 262143, 387158345, 68332056247, 3745977788889, 97745259402791, 1526853641242033, 16385984911571535, 132080236787517137, 849905364703000879, 4559917313492231481, 21063415967393012423, 85832073671072149225, 314423447258679349527, 1051013025824763647969
Offset: 0
- J. H. Conway and R. K. Guy, The Book of Numbers, Copernicus Press, NY, 1996, p. 54.
-
[(n+1)^18-n^18: n in [0..20]]; // Vincenzo Librandi, Nov 22 2011
-
b:=18: a:=n->(n+1)^b-n^b: seq(a(n),n=0..18); # Muniru A Asiru, Feb 28 2018
-
Table[(n+1)^18-n^18,{n,0,20}] (* Vincenzo Librandi, Nov 22 2011 *)
-
for(n=0,20, print1((n+1)^18 - n^18, ", ")) \\ G. C. Greubel, Feb 27 2018
A022535
Nexus numbers (n+1)^19 - n^19.
Original entry on oeis.org
1, 524287, 1161737179, 273715645477, 18798608421181, 590286253682371, 10789535445362647, 132716292890482729, 1206736529597136217, 8649148282327007911, 51159090448414546291, 258320908922208380557, 1142440291004823183829, 4514383668573468286507, 16192074241582091462191
Offset: 0
- J. H. Conway and R. K. Guy, The Book of Numbers, Copernicus Press, NY, 1996, p. 54.
-
[(n+1)^19-n^19: n in [0..20]]; // Vincenzo Librandi, Nov 22 2011
-
b:=19: a:=n->(n+1)^b-n^b: seq(a(n),n=0..18); # Muniru A Asiru, Feb 28 2018
-
Table[(n+1)^19-n^19,{n,0,20}] (* Vincenzo Librandi, Nov 22 2011 *)
-
for(n=0,20, print1((n+1)^19 - n^19, ", ")) \\ G. C. Greubel, Feb 27 2018
A022536
Nexus numbers (n+1)^20 - n^20.
Original entry on oeis.org
1, 1048575, 3485735825, 1096024843375, 94267920012849, 3560791008422351, 76136107857549025, 1073129238309234975, 11004743954450081825, 87842334540943071199, 572749994932560009201, 3161009997514915112975, 15171203782433324316625, 64663291650404002121775
Offset: 0
- J. H. Conway and R. K. Guy, The Book of Numbers, Copernicus Press, NY, 1996, p. 54.
-
[(n+1)^20 - n^20: n in [0..20]]; // G. C. Greubel, Feb 27 2018
-
b:=20: a:=n->(n+1)^b-n^b: seq(a(n),n=0..18); # Muniru A Asiru, Feb 28 2018
-
Table[(n+1)^20 - n^20, {n,0,20}] (* G. C. Greubel, Feb 27 2018 *)
-
for(n=0,20, print1((n+1)^20 - n^20, ", ")) \\ G. C. Greubel, Feb 27 2018
A022537
Nexus numbers (n+1)^21 - n^21.
Original entry on oeis.org
1, 2097151, 10458256051, 4387586157901, 472439111692021, 21460113482174731, 536608913442906151, 8664826172771491801, 100195617094657583401, 890581010868487640791, 6400249944258160101211, 38604869965111541364901, 201059409164080691238301, 924291046880536829143651
Offset: 0
- J. H. Conway and R. K. Guy, The Book of Numbers, Copernicus Press, NY, 1996, p. 54.
-
[(n+1)^21 - n^21: n in [0..20]]; // G. C. Greubel, Feb 27 2018
-
b:=21: a:=n->(n+1)^b-n^b: seq(a(n),n=0..18); # Muniru A Asiru, Feb 28 2018
-
Last[#]-First[#]&/@Partition[Range[0,20]^21,2,1] (* Harvey P. Dale, Dec 06 2013 *)
-
for(n=0,20, print1((n+1)^21 - n^21, ", ")) \\ G. C. Greubel, Feb 27 2018
A022539
Nexus numbers (n+1)^23 - n^23.
Original entry on oeis.org
1, 8388607, 94134790219, 70274600998837, 11850560210900461, 777809294098524691, 26579017117027313527, 562927063018624735369, 8272642309293795444217, 91137061880347498904071, 795430243255237372246531, 5729307023693999638873597, 35129168146463879355925669
Offset: 0
- J. H. Conway and R. K. Guy, The Book of Numbers, Copernicus Press, NY, 1996, p. 54.
-
[(n+1)^23 - n^23: n in [0..20]]; // G. C. Greubel, Feb 27 2018
-
b:=23: a:=n->(n+1)^b-n^b: seq(a(n),n=0..18); # Muniru A Asiru, Feb 28 2018
-
Differences/@Partition[Range[0,20]^23,2,1]//Flatten (* Harvey P. Dale, Apr 20 2016 *)
-
for(n=0,20, print1((n+1)^23 - n^23, ", ")) \\ G. C. Greubel, Feb 27 2018
A022540
Nexus numbers (n+1)^24 - n^24.
Original entry on oeis.org
1, 16777215, 282412759265, 281192547174175, 59323169798679969, 4678776693546226271, 186842850042244797505, 4530785251489078799295, 75044076594002864649665, 920233556923127490136639, 8849732675807611094711841, 69647114527583233038729695, 463303923170979668638153825
Offset: 0
- J. H. Conway and R. K. Guy, The Book of Numbers, Copernicus Press, NY, 1996, p. 54.
-
[(n+1)^24 - n^24: n in [0..20]]; // G. C. Greubel, Feb 27 2018
-
b:=24: a:=n->(n+1)^b-n^b: seq(a(n),n=0..18); # Muniru A Asiru, Feb 28 2018
-
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 *)
-
for(n=0,20, print1((n+1)^24 - n^24, ", ")) \\ G. C. Greubel, Feb 27 2018