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

 

标志
提示
(来自的问候整数序列在线百科全书!)
搜索: 编号:a336432
显示1-1个结果(共1个)。 第页1
    排序:关联|参考文献||被改进的|创建     格式:长的|短的|数据
A336432飞机 n的除数(d_i,d_j,d_k,d_m)的有序四元组的数目,使得GCD(d_i,d_j,d_k、d_m)>1。 +0
1
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 1, 0, 1, 0, 1, 0, 0, 0, 16, 0, 0, 0, 1, 0, 3, 0, 5, 0, 0, 0, 29, 0, 0, 0, 16, 0, 3, 0, 1, 1, 0, 0, 74, 0, 1, 0, 1, 0, 16, 0, 16, 0, 0, 0, 98, 0, 0, 1, 15, 0, 3, 0, 1, 0, 3, 0, 181, 0, 0, 1, 1, 0, 3, 0, 74, 1, 0, 0, 98, 0, 0, 0, 16, 0, 98, 0, 1, 0, 0, 0, 220, 0, 1, 1, 29, 0, 3, 0 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,24
评论
集合{(x,y,z,w)中的元素数:x|n,y|n,z|n,w|n,x<y<z<w,GCD(x,y,z,w)>1}。
序列的每一项都无限重复;例如:
对于n=1、2、3、4、5、6、7、8、9、10、11、13、14、15、17、19、21、22、23、25、26…,a(n)=0。。。(数字k使得k的真除数的乘积小于等于k;即k的除数的积小于等于k^2;参见A007964号).
a(n)=1,n=12、16、18、20、28、44、45、50、52、63、68、75、76、81、92、98、99。。。(素数的四次幂,或素数与不同素数的平方的乘积;参见A080258号).
n=32、243、3125、16807…时,a(n)=5。。。(素数的五次幂;参见A050997型).
n=64、729、15625、117649…时,a(n)=15。。。(带7个除数的数字:素数的6次幂;参见A030516型).
链接
例子
a(30)=3,因为30的除数是{1,2,3,5,6,10,15,30},对于以下三个四倍的除数:(2,6,10,30),(3,6,15,30)和(5,10,15,三十),GCD(d_i,d_j,d_k,d_m)>1。
MAPLE公司
其中(数字理论):nn:=100:
对于从1到nn的n,do:
它:=0:d:=除数(n):n0:=nops(d):
对于从1到n0-3的i,执行以下操作:
对于从i+1到n0-2的j,执行以下操作:
对于从j+1到n0-1的k,do:
对于从k+1到n0的l,执行以下操作:
如果igcd(d[i],d[j],d[k],d[l])>1
然后
它:=它+1:
其他的
图1:
日期:
日期:
日期:
日期:
printf(`%d,`,it):
日期:
数学
数组[Count[GCD@@#&/@Subsets[Divisors[#],{4}],_?(# > 1 &)] &, 100] (*阿米拉姆·埃尔达尔2020年10月31日之后迈克尔·德弗利格A336530型*)
程序
(PARI)a(n)=my(d=除数(n));总和(i=1,#d-3,总和(j=i+1,#d-2,总和(k=j+1,#d-1,总和(m=k+1,#d,gcd([d[i],d[j],d[k],d[m])>1))\\米歇尔·马库斯2020年10月31日
(PARI)a(n)={my(f=因子(n),vp=vecprod(f[,1]),d=除数(vp),res=0);对于(i=2,#d,res-=二项式(numdiv(n/d[i]),4)*(-1)^omega(d[i]\\大卫·A·科内斯2020年10月31日
交叉参考
囊性纤维变性。175387英镑,A336530型.
关键词
非n,改变
作者
米歇尔·拉格诺2020年10月5日
扩展
条款更正人大卫·A·科内斯2020年10月31日
状态
已批准
第页1

搜索在0.003秒内完成

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

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

上次修改时间:2024年4月25日06:35 EDT。包含371964个序列。(在oeis4上运行。)