Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).
%I #23 Sep 08 2022 08:44:46
%S 1,8191,1586131,65514541,1153594261,11839990891,83828316391,
%T 452866803481,1992110014441,7458134171671,24522712143931,
%U 72470493235141,195881901213181,490839666661891,1152480295105231,2557404559011121,5400978405535441,10918386832765231
%N Nexus numbers (n+1)^13-n^13.
%D J. H. Conway and R. K. Guy, The Book of Numbers, Copernicus Press, NY, 1996, p. 54.
%H Vincenzo Librandi, <a href="/A022529/b022529.txt">Table of n, a(n) for n = 0..10000</a>
%H <a href="/index/Rec">Index entries for linear recurrences with constant coefficients</a>, signature (13,-78,286,-715,1287,-1716,1716,-1287,715,-286,78,-13,1).
%F a(n) = A010801(n+1) - A010801(n). - _Michel Marcus_, Sep 25 2014
%F G.f.: -(x^12 +8178*x^11 +1479726*x^10 +45533450*x^9 +423281535*x^8 +1505621508*x^7 +2275172004*x^6 +1505621508*x^5 +423281535*x^4 +45533450*x^3 +1479726*x^2 +8178*x +1) / (x-1)^13. - _Colin Barker_, Sep 25 2014
%F G.f.: polylog(-13, x)*(1-x)/x. See the g.f. of the rows of A008292 by _Vladeta Jovovic_, Sep 02 2002. - _Wolfdieter Lang_, May 10 2021
%t q=13;lst={};Do[AppendTo[lst,(n+1)^q-n^q],{n,0,4!}];lst (* _Vladimir Joseph Stephan Orlovsky_, Jan 23 2009 *)
%t Table[(n+1)^13-n^13,{n,0,20}] (* _Vincenzo Librandi_, Nov 22 2011 *)
%o (Magma) [(n+1)^13-n^13: n in [0..20]]; // _Vincenzo Librandi_, Nov 22 2011
%o (PARI) a(n) = (n+1)^13 - n^13; \\ _Michel Marcus_, Sep 25 2014
%Y Column k=12 of array A047969.
%Y Cf. A008292, A022528.
%K nonn,easy
%O 0,2
%A _N. J. A. Sloane_.