登录
OEIS由OEIS基金会的许多慷慨捐赠者.

 

标志
提示
(来自的问候整数序列在线百科全书!)
搜索: a073181-编号:a073191
显示找到的3个结果中的1-3个。 第页1
    排序:关联|参考文献||被改进的|创建     格式:长的|短的|数据
A073185号 n的立方因子之和。 +10
7
1, 3, 4, 7, 6, 12, 8, 7, 13, 18, 12, 28, 14, 24, 24, 7, 18, 39, 20, 42, 32, 36, 24, 28, 31, 42, 13, 56, 30, 72, 32, 7, 48, 54, 48, 91, 38, 60, 56, 42, 42, 96, 44, 84, 78, 72, 48, 28, 57, 93, 72, 98, 54, 39, 72, 56, 80, 90, 60, 168, 62, 96, 104, 7, 84, 144, 68, 126, 96, 144, 72 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,2
评论
n的立方核的除数之和(见第一个公式)。
链接
莱因哈德·祖姆凯勒(Reinhard Zumkeller),n=1..10000时的n,a(n)表
公式
a(n)=A000203号(A007948号(n) )。
a(n)<=A073183号(n) ●●●●。
与a(p)=1+p相乘,a(p^e)=1+p+p^2,e>1-克里斯蒂安·鲍尔2005年5月18日
a(n)=总和(A212793型(A027750型(n,k))*A027750型(n,k):k=1。。A000005号(n) )-莱因哈德·祖姆凯勒2012年5月27日
Dirichlet g.f.:zeta(s)*zeta(s-1)/zeta(3s-3)-R.J.马塔尔2011年4月12日
和{k=1..n}a(k)~Pi^2*n^2/(12*Zeta(3))-瓦茨拉夫·科特索维奇2019年2月1日
例子
56的除数是{1,2,4,7,8,14,28,56},8=2^3和56=7*2^3不是立方,因此a(56)=1+2+4+7+14+28=56。
MAPLE公司
charFfree:=进程(n,t)局部f;对于ifactors(n)[2]中的f,如果op(2,f)>=t,则返回0;结束条件:;end-do:返回1;结束进程:
A073185号:=过程(n)加法(d*charFfree(d,3),d=数值[除数](n));结束进程:#R.J.马塔尔2011年4月12日
数学
nn=71;f[list_,i_]:=列表[[i]];a=表[If[Max[FactorInteger[n][All,2]]]<=2,n,0],{n,1,nn}];b=表[1,{nn}];选择[Table[DirichletConvolve[f[a,n],f[b,n]、n,m],{m,1,nn}],#>0&](*杰弗里·克雷策2015年3月22日*)
f[p_,e_]:=1+p+如果[e>1,p^2,0];a[1]=1;a[n_]:=倍@@f@@FactorInteger[n];数组[a,100](*阿米拉姆·埃尔达尔2020年9月14日*)
黄体脂酮素
(哈斯克尔)
a073185=总和。过滤器((==1)。a212793)。a027750_低
--莱因哈德·祖姆凯勒2012年5月27日
(PARI)a(n)={my(f=factor\\米歇尔·马库斯2015年2月6日
交叉参考
关键字
非n,多重
作者
扩展
删除了不正确的评论阿尔瓦尔·伊比亚斯2015年2月6日
状态
经核准的
A073180美元 n的除数不大于n的无平方核。 +10
5
1, 2, 2, 2, 2, 4, 2, 2, 2, 4, 2, 5, 2, 4, 4, 2, 2, 4, 2, 5, 4, 4, 2, 5, 2, 4, 2, 5, 2, 8, 2, 2, 4, 4, 4, 5, 2, 4, 4, 6, 2, 8, 2, 5, 5, 4, 2, 5, 2, 4, 4, 5, 2, 4, 4, 6, 4, 4, 2, 11, 2, 4, 5, 2, 4, 8, 2, 5, 4, 8, 2, 5, 2, 4, 4, 5, 4, 8, 2, 6, 2, 4, 2, 11, 4, 4, 4, 6, 2, 10, 4, 5, 4, 4, 4, 5, 2, 4, 5, 5, 2, 8, 2 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,2
链接
莱因哈德·祖姆凯勒(Reinhard Zumkeller),n=1..10000时的n,a(n)表
公式
a(n)>=A034444号(n) ●●●●。
a(n)=A095960型(n) +1-莱因哈德·祖姆凯勒2013年9月10日
例子
56=7*2^3的无平方核是14=7*2,56的除数<=14是{1,2,4,7,8,14},因此a(56)=6。
数学
a[n_]:=除数和[n,1&,#<=倍@@FactorInteger[n][[;;,1]]&];数组[a,100](*阿米拉姆·埃尔达尔2022年7月9日*)
黄体脂酮素
(哈斯克尔)
a073180 n=长度[x|x<-a027750_当前n,x<=a007947 n]
--莱因哈德·祖姆凯勒2013年9月10日
交叉参考
关键字
非n
作者
状态
经核准的
A073183 不大于n的立方核的n的除数之和。 +10
5
1, 3, 4, 7, 6, 12, 8, 7, 13, 18, 12, 28, 14, 24, 24, 7, 18, 39, 20, 42, 32, 36, 24, 36, 31, 42, 13, 56, 30, 72, 32, 7, 48, 54, 48, 91, 38, 60, 56, 50, 42, 96, 44, 84, 78, 72, 48, 36, 57, 93, 72, 98, 54, 39, 72, 64, 80, 90, 60, 168, 62, 96, 104, 7, 84, 144, 68, 126, 96, 144, 72 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,2
评论
a(n)>=A073185号(n) ●●●●。
链接
例子
56=7*2^3的立方核是28=7*2 ^2,56的除数<=28是{1,2,4,7,8,14,28},因此a(56)=1+2+4+7+8+14+28=64。
数学
sdcfk[n_]:=模块[{cf=Times@@Flatten[表[#[[1]],#[[2]]]&/@({#[[1]),如果[#[2]]>2,2,#[2]]}&/@FactorInteger[n])]},总计[Select[Divisors[n],#<=cf&]]];数组[sdcfk,80](*哈维·P·戴尔2018年7月14日*)
黄体脂酮素
(PARI)a007948(n)=我的(f=系数(n));对于(i=1,#f~,f[i,2]=min(f[i、2],2));因子回收(f);
a(n)=总和(n,d,d*(d<=a007948(n)))\\米歇尔·马库斯2015年2月7日
交叉参考
关键字
非n,
作者
状态
经核准的
第页1

搜索在0.004秒内完成

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

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

上次修改时间:2024年4月24日16:34 EDT。包含371961个序列。(在oeis4上运行。)