登录
A212104型
所有项都在{1,…,n}中的(w,x,y,z)的个数,w<={x,y和z}的调和平均数。
0, 1, 9, 36, 106, 252, 528, 964, 1617, 2559, 3880, 5631, 7950, 10900, 14595, 19161, 24727, 31419, 39399, 48790, 59799, 72570, 87277, 104124, 123342, 145075, 169575, 197061, 227779, 261915, 299778, 341599, 387624, 438171, 493486
抵消
0,3
评论
a(n)+A212105型(n) =n^4。
如果3/w<=1/x+1/y+1/z,则计算四元组(w,x,y,z)。
有关相关序列的指南,请参阅A211795型.
数学
t=编译[{{n,_Integer}},模块[{s=0},
(Do[如果[w*(y*z+z*x+x*y)<=3 x*y*z,s=s+1],
{w,1,#},{x,1,#1},}y,1,},[z,1,#}]&[n];s) ]];
地图[t[#]&,范围[0,50]](*A212104型*)
FindLinearRecurrence[%]
(*彼得·J·C·摩西2012年4月13日*)
关键词
非n
作者
克拉克·金伯利2012年5月4日
状态
经核准的