OEIS哀悼西蒙斯感谢西蒙斯基金会支持包括OEIS在内的许多科学分支的研究。
登录
OEIS由OEIS基金会的许多慷慨捐赠者.

 

徽标
提示
(来自的问候整数序列在线百科全书!)
搜索: a339663-编号:a339693
显示找到的3个结果中的1-3个。 第页1
    排序:关联|参考文献||被改进的|创建     格式:长的|短的|数据
A339665型 调和平均数为整数的n的除数的非空子集的数目。 +10
6
1, 2, 2, 3, 2, 9, 2, 4, 3, 4, 2, 17, 2, 4, 6, 5, 2, 19, 2, 10, 4, 4, 2, 37, 3, 4, 4, 12, 2, 45, 2, 6, 4, 4, 4, 57, 2, 4, 4, 28, 2, 29, 2, 6, 16, 4, 2, 85, 3, 6, 4, 6, 2, 35, 4, 23, 4, 4, 2, 301, 2, 4, 6, 7, 4, 28, 2, 6, 4, 19, 2, 255, 2, 4, 10, 6, 4, 20, 2, 61 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,2
链接
埃里克·魏斯坦的数学世界,调和平均值
例子
a(6)=9个子集:{1}、{2}、}3}、[6}、[2]、6},{3,6}和{1,2,3,6{。
数学
a[n_]:=计数[子集[Divisors[n]],_?(长度[#]>0&&IntegerQ[HarmonicMean[#]]&)];数组[a,100](*阿米拉姆·埃尔达尔,2021年11月9日*)
黄体脂酮素
(PARI)h(s,d)=#s/sum(k=1,#s,1/d[s[k]]);
a(n)=my(d=除数(n),nb=0);对于子集(#d,s,如果(#s&&(分母(h(s,d))==1,nb++));nb\\米歇尔·马库斯2020年12月15日
(Python)
从itertools导入组合
从sympy导入除数
定义A339665型(n) :
ds=元组(除数(n,生成器=True))
返回和(如果n*i%sum(d)==0,则组合(ds,i)中d的和(1,len(ds)+1))#柴华武2021年11月9日
交叉参考
关键词
非n
作者
状态
经核准的
A339666飞机 根平方为整数的n的除数的非空子集的数目。 +10
4
1, 2, 2, 3, 2, 4, 3, 4, 3, 4, 2, 6, 2, 6, 4, 5, 2, 6, 2, 6, 6, 4, 2, 8, 3, 4, 4, 9, 2, 8, 2, 6, 4, 4, 7, 9, 2, 4, 4, 12, 3, 12, 2, 6, 7, 4, 2, 12, 5, 6, 4, 6, 2, 8, 5, 12, 4, 4, 2, 26, 2, 4, 9, 7, 4, 8, 2, 6, 4, 14, 2, 12, 2, 4, 6, 6, 6, 8, 2, 24, 5, 6, 2, 22 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,2
链接
阿洛伊斯·海因茨,n=1..1000时的n,a(n)表
埃里克·魏斯坦的数学世界,均方根
例子
a(14)=6个子集:{1}、{2}、}7}、[14]、{1,7}和{2,14}。
MAPLE公司
a: =proc(n)选项记忆;使用数字理论;局部l,b;
l、 b:=排序([除数(n)[]]),
proc(i,s,c)选项记忆;
`如果`(i=0,`如果`(c>0和issqr(s/c),1,0),
b(i-1,s,c)+b(i-l,s+l[i]^2,c+1))
结束;忘记(b);b(无(1),0美元2)
结束时间:
seq(a(n),n=1..100)#阿洛伊斯·海因茨2022年9月30日
数学
a[n_]:=a[n]=模[{b,l=除数[n]},b[i_,s_,c]:=b[i,s,c]=如果[i==0,如果[c>0&&IntegerQ@Sqrt[s/c],1,0],b[i-1,s,c]+b[i-l,s+l[i]^2,c+1]];b[长度[l],0,0]];
表[a[n],{n,1100}](*Jean-François Alcover公司2022年10月13日之后阿洛伊斯·海因茨*)
交叉参考
关键词
非n
作者
状态
经核准的
A339664飞机 几何平均数为整数的n个除数的非空子集的数目。 +10
1, 2, 2, 5, 2, 4, 2, 8, 5, 4, 2, 10, 2, 4, 4, 15, 2, 10, 2, 10, 4, 4, 2, 16, 5, 4, 8, 10, 2, 8, 2, 26, 4, 4, 4, 63, 2, 4, 4, 16, 2, 8, 2, 10, 10, 4, 2, 30, 5, 10, 4, 10, 2, 16, 4, 16, 4, 4, 2, 20, 2, 4, 10, 45, 4, 8, 2, 10, 4, 8, 2, 196, 2, 4, 10, 10, 4, 8, 2, 30 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,2
链接
埃里克·魏斯坦的数学世界,几何平均值
例子
a(12)=10个子集:{1},{2},}3},[4],{6},[12],{1,4},[3],{12},1,2,4}和{3,6,12}。
交叉参考
关键词
非n
作者
状态
经核准的
第页1

搜索在0.008秒内完成

查找|欢迎光临|维基|注册|音乐|地块2|演示|索引|浏览|更多|网络摄像头
贡献新序列。或评论|格式|样式表|变换|超级搜索|最近
OEIS社区|维护人OEIS基金会。

许可协议、使用条款、隐私政策。.

最后修改时间:美国东部时间2024年5月19日14:45。包含372698个序列。(在oeis4上运行。)