cp's OEIS Frontend

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.

A083010 a(n) = 6^n(B_n(1/6)-B_n(0)) where B_n(x) is the n-th Bernoulli polynomial.

This page as a plain text file.
%I A083010 #21 Sep 28 2016 09:55:21
%S A083010 0,1,-5,10,25,-170,-575,6370,28225,-415826,-2294975,41649850,
%T A083010 275622625,-5922729722,-45718037855,1134081384850,10004182986625,
%U A083010 -281284596509858,-2791456543622015,87722769712529770,967282878165054625,-33597252908389628234,-407509096583935700255
%N A083010 a(n) = 6^n(B_n(1/6)-B_n(0)) where B_n(x) is the n-th Bernoulli polynomial.
%H A083010 Seiichi Manyama, <a href="/A083010/b083010.txt">Table of n, a(n) for n = 0..452</a>
%F A083010 E.g.f.: 6x(exp(x)-1)/(exp(6x)-1). - _Michael Somos_, Aug 02 2006
%F A083010 a(n) = Sum_{k=0..n-1} 6^k*B(k)*C(n,k) where B(k) is the k-th Bernoulli number and C(n,k) = binomial(n,k).
%t A083010 Range[0, 15]! CoefficientList[ Series[ 6x/(1 + Exp[x] + Exp[ 2x] + Exp[ 3x] + Exp[ 4x] + Exp[ 5x]), {x, 0, 15}], x] (* _Robert G. Wilson v_, Oct 26 2012 *)
%o A083010 (PARI) a(n)=sum(k=0,n-1,6^k*binomial(n,k)*bernfrac(k))
%o A083010 (PARI) {a(n)=if(n<1, 0, n!*polcoeff( 6*x*(exp(x+x*O(x^n))-1)/(exp(6*x +x*O(x^n))-1), n))} /* _Michael Somos_, Aug 02 2006 */
%Y A083010 Cf. A001469.
%Y A083010 Cf. A036968, A083007, A083008, A083009, A083011, A083012, A083013, A083014.
%K A083010 sign
%O A083010 0,3
%A A083010 _Benoit Cloitre_, May 31 2003