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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A285729型 复合过滤器:a(n)=T(A032742号(n) ,A046523号(n) ),其中T(n,k)是序列A000027号用作配对函数。 10
1, 2, 2, 12, 2, 31, 2, 59, 18, 50, 2, 142, 2, 73, 50, 261, 2, 199, 2, 220, 73, 131, 2, 607, 33, 166, 129, 314, 2, 961, 2, 1097, 131, 248, 73, 1396, 2, 295, 166, 923, 2, 1246, 2, 550, 340, 401, 2, 2509, 52, 655, 248, 692, 2, 1252, 131, 1303, 295, 590, 2, 3946, 2, 661, 517, 4497, 166, 1924, 2, 1024, 401, 2051, 2, 5707, 2, 898, 655, 1214, 131, 2317, 2, 3781, 888 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,2
链接
Antti Karttunen,n,a(n)表,n=1.10000
埃里克·魏斯坦的数学世界,配对功能
公式
a(n)=(1/2)*(2+((A032742号(n)+A046523号(n) )^2)-A032742号(n) -3个*A046523号(n) )。
数学
表[(2+(#1+#2)^2-#1-3#2)/2@@{Sort[Flatten@Apply[TensorProduct,#/.{p_,e_}/;p>1:>p^Range[0,e]][[-2]],Times@@MapIndexed[Prime[First@#2]^#1&,Sort[#[[All,-1]],Greater]]-Boole[n==1]}&@FactorInteger@n,{n,81}](*迈克尔·德弗利格,2017年5月4日*)
黄体脂酮素
(PARI)
A032742号(n) =如果(1==n,n,n/vecmin(系数(n)[,1]);
A046523号(n) ={my(f=vecsort(factor(n)[,2],4),p);prod(i=1,#f,(p=nextprime(p+1))^f[i]);};\\此函数来自查尔斯·格里特豪斯四世2011年8月17日
A285729型(n) =(1/2)*(2+((A032742号(n)+A046523号(n) )^2)-A032742号(n) -3个*A046523号(n) );
对于(n=110000,写入(“b285729.txt”,n,“”,A285729型(n) );
(方案)(定义(A285729型n) (*(/1 2)(+(导出(+(A032742号n)(A046523号n) )2)(-(A032742号n) )(-(*3)(A046523n) )2))
(Python)
从辛导入除数,因子
def a032742(n):如果n==1 else max(除数(n)[:-1]),则返回1
定义T(n,m):返回((n+m)**2-n-3*m+2)/2
定义P(n):
f=因子(n)
return排序([f[i]表示f]中的i)
定义a046523(n):
x=1
为True时:
如果P(n)==P(x):返回x
其他:x+=1
定义a(n):返回T(a032742(n),a046523(n))#因德拉尼尔·戈什,2017年5月5日
交叉参考
关键词
非n
作者
安蒂·卡图恩2017年5月4日
状态
经核准的

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

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

上次修改时间:2024年6月23日05:53 EDT。包含373629个序列。(在oeis4上运行。)