%I#30 2021年4月2日17:57:56
%S 1,1,2,1,6,1,6,1,10,6,1210,1,2,1,30,1,42,1110,1,6,1546,1,2,1,30,
%电话1462,1170,1,6,151870,1,2,1330,1,42,1,46,1,6,16630,1,22,1,30,1,
%U 798,1290,1,6,1930930,1,2,1102,1966,1,10,1,66,11919190号
%N(N+1)*Bernoulli(N)的分母。
%C显然a(n)=分母(和{k=0..n-1}(-1)^(n-k+1)*E1(n,k+1)/二项式(n,k+1)),其中E1(n,k)表示一阶欧拉数A123125_Peter Luschny_,2021年2月17日
%H Antti Karttunen,n表,n=0..20000的a(n)(术语0..200来自n.J.a.Sloane)
%H M.Kaneko,<a href=“https://doi.org/10.3792/pjaa.71.192“>伯努利数的递推公式,日本科学院学报,71 A(1995),192-193。
%H S.C.Woon,<a href=“http://www.jstor.org/stable/2691054“>生成伯努利数的树</A>,《数学杂志》,70(1997),51-56。
%H<a href=“/index/Be#Bernoulli”>为与伯努利数相关的序列索引条目</a>
%t分母/@表[(n+1)BernoulliB[n],{n,0,80}](*H arvey P.Dale_,2011年5月19日*)
%o(哈斯克尔)
%o a050932 n=a050932_list!!n个
%o a050932_list=1:map(分母.sum)(zipWith(zipWath(%))
%o(zipWith(map.(*)))(删除2 a000142_list)a242179_tabf)a106831_tabf)
%o——_ Inhard Zumkeller_,2014年7月4日
%o(PARI)a(n)=分母(bernfrac(n)*(n+1))\\-Charles R Greathouse IV_,2017年2月7日
%o(Python)
%o来自sympy import bernoulli,gcd
%o定义A050932(n):
%o q=伯努利(n)。q个
%o返回q//gcd(q,n+1)#_Chai Wah Wu_,2021年4月2日
%Y参见A050925、A000367/A002445、A027641/A027642、A002882、A003245、A127187、A127188、A242179、A106831、A000142、A123125。
%K non,frac,很好,很容易
%0、3
%A _N.J.A.Sloane,1999年12月30日
|