This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A022530 #32 Jun 28 2023 22:04:49 %S A022530 1,16383,4766585,263652487,5835080169,72260648471,599858908753, %T A022530 3719823438255,18478745943857,77123207545039,279749833583241, %U A022530 904168630965623,2653457921150425,7174630439858727,18080919199832609,42864668012537311,96320232521472993,206435541022680095 %N A022530 Nexus numbers (n+1)^14 - n^14. %D A022530 J. H. Conway and R. K. Guy, The Book of Numbers, Copernicus Press, NY, 1996, p. 54. %H A022530 Harvey P. Dale, <a href="/A022530/b022530.txt">Table of n, a(n) for n = 0..1000</a> %F A022530 G.f.: (1+x) *(x^12 +16368*x^11 +4520946*x^10 +193889840*x^9 +2377852335*x^8 +10465410528*x^7 +17505765564*x^6 +10465410528*x^5 +2377852335*x^4 +193889840*x^3 +4520946*x^2 +16368*x+1) / (x-1)^14 . - _R. J. Mathar_, Sep 02 2016 %F A022530 a(n) = A010802(n+1) - A010802(n). - _Michel Marcus_, Feb 28 2018 %p A022530 b:=14: a:=n->(n+1)^b-n^b: seq(a(n),n=0..18); # _Muniru A Asiru_, Feb 28 2018 %t A022530 Last[#]-First[#]&/@Partition[Range[0,20]^14,2,1] (* _Harvey P. Dale_, Oct 04 2011 *) %t A022530 Table[(n+1)^14 - n^14, {n,0,20}] (* _G. C. Greubel_, Feb 27 2018 *) %o A022530 (PARI) for(n=0,20, print1((n+1)^14 - n^14, ", ")) \\ _G. C. Greubel_, Feb 27 2018 %o A022530 (Magma) [(n+1)^14 - n^14: n in [0..20]]; // _G. C. Greubel_, Feb 27 2018 %Y A022530 Column k=13 of A047969. %Y A022530 Cf. A010802 (n^14). %K A022530 nonn %O A022530 0,2 %A A022530 _N. J. A. Sloane_