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 A255177 #56 Oct 07 2024 11:05:33 %S A255177 1,126,1932,12138,47544,140070,341796,730002,1412208,2531214,4270140, %T A255177 6857466,10572072,15748278,22780884,32130210,44327136,59978142, %U A255177 79770348,104476554,134960280,172180806,217198212,271178418 %N A255177 Second differences of seventh powers (A001015). %H A255177 Luciano Ancora, <a href="/A255177/b255177.txt">Table of n, a(n) for n = 0..1000</a> %H A255177 Luciano Ancora, <a href="https://upload.wikimedia.org/wikipedia/commons/f/fe/Sum_of_powers.pdf">Sums of powers of positive integers and their recurrence relations</a>, section 0.5. %H A255177 <a href="/index/Rec#order_06">Index entries for linear recurrences with constant coefficients</a>, signature (6,-15,20,-15,6,-1). %F A255177 G.f.: (1 + 120*x + 1191*x^2 + 2416*x^3 + 1191*x^4 + 120*x^5 + x^6)/(1 - x)^6. %F A255177 a(n) = 14*n*(3*n^4 + 5*n^2 + 1) for n>0, a(0)=1. %F A255177 a(n) = A022523(n)-A022523(n-1). - _R. J. Mathar_, Jul 16 2015 %e A255177 Second differences: 1, 126, 1932, 12138, 47544, ... (this sequence) %e A255177 First differences: 1, 127, 2060, 14324, 63801, ... (A152726) %e A255177 ---------------------------------------------------------------------- %e A255177 The seventh powers: 1, 128, 2187, 16384, 78125, ... (A001015) %e A255177 ---------------------------------------------------------------------- %e A255177 First partial sums: 1, 129, 2316, 18700, 96825, ... (A000541) %e A255177 Second partial sums: 1, 130, 2446, 21146, 117971, ... (A250212) %e A255177 Third partial sums: 1, 131, 2577, 23723, 141694, ... (A254641) %e A255177 Fourth partial sums: 1, 132, 2709, 26432, 168126, ... (A254646) %e A255177 Fifth partial sums: 1, 133, 2842, 29274, 197400, ... (A254684) %t A255177 Join[{1}, Table[14 n (3 n^4 + 5 n^2 + 1), {n, 1, 30}], {n, 0, 24}] (* or *) %t A255177 CoefficientList[Series[(1 + 120 x + 1191 x^2 + 2416 x^3 + 1191 x^4 + 120 x^5 + x^6)/(1 - x)^6, {x, 0, 22}], x] %o A255177 (Magma) [1] cat [14*(-1+n)*(9-22*n+23*n^2-12*n^3+3*n^4): n in [2..30]]; // _Vincenzo Librandi_, Mar 12 2015 %o A255177 (Python) %o A255177 def A255177(n): return 14*n*(n**2*(3*n**2 + 5) + 1) if n else 1 # _Chai Wah Wu_, Oct 07 2024 %Y A255177 Cf. A000541, A001015, A152726, A250212, A254641, A254646, A254684, A255178, A255179. %K A255177 nonn,easy %O A255177 0,2 %A A255177 _Luciano Ancora_, Feb 21 2015 %E A255177 Edited by _Bruno Berselli_, Mar 19 2015