%I#23 2022年9月8日08:44:46

%S 1819115861316551454111535942611839999089183828316391，

%电话：4528668034811992110014441745813417167124522712143931，

%电话：7247049323514119588190121318149083966618911524802951052312574045590111215400978405535441109183862765231

%N Nexus数（N+1）^13-N^13。

%D J.H.Conway和R.K.Guy，《数字书》，哥白尼出版社，纽约，1996年，第54页。

%H Vincenzo Librandi，n的表，n=0..10000的a（n）</a>

%H<a href=“/index/Rec”>常系数线性复发的索引条目，签名（13，-78286，-7151287，-17161716，-1287715，-286,78，-13,1）。

%F a（n）=A010801（n+1）-A010801（n）.-_米歇尔·马库斯，2014年9月25日

%传真：-（x^12+8178*x^11+1479726*x^10+45533450*x^9+423281535*x^8+1505621508*x^7+2275172004*x^6+15056211508*x ^5+42328151535*x ^4+45533450*x^3+1479726*x ^2+8178*x+1）/（x-1）^13.-_科林·巴克，2014年9月25日

%F G.F.：polylog（-13，x）*（1-x）/x。见Vladeta Jovovic_于2002年9月2日发布的A008292行的G.F_沃尔夫迪特·朗，2021年5月10日

%t q=13；lst={}；执行[AppendTo[lst，（n+1）^q-n^q]，{n，0,4！}]；第1期（*_Vladimir Joseph Stephan Orlovsky，2009年1月23日*）

%t表[（n+1）^13-n^13，{n，0,20}]（*_Winenzo Librandi_，2011年11月22日*）

%o（岩浆）[（n+1）^13-n^13:n in[0..20]]；//_文森佐·利班迪（Vincenzo Librandi），2011年11月22日

%o（PARI）a（n）=（n+1）^13-n^13；\\_Michel Marcus_，2014年9月25日

%数组A047969的Y列k=12。

%Y参考A008292、A022528。

%K nonn，简单

%0、2

%A.N.J.A.斯隆。