显示找到的4个结果中的1-4个。
第页1
1, 2, 4, 3, 8, 6, 16, 5, 9, 12, 32, 10, 64, 24, 18, 7, 128, 15, 256, 20, 36, 48, 512, 14, 27, 96, 25, 40, 1024, 30, 2048, 11, 72, 192, 54, 21, 4096, 384, 144, 28, 8192, 60, 16384, 80, 50, 768, 32768, 22, 81, 45, 288, 160, 65536, 35, 108, 56, 576, 1536, 131072, 42
评论
因子n;将每个素数(i)替换为i,取共轭分区,将部分i替换为素数(i),然后相乘。
(结束)
(结束)
与Heinz数n的分区共轭的分区的Heinz号。分区p=[p_1,p_2,…,p_r]的Heinx号定义为乘积(p_j-th素数,j=1…r)。例如:a(3)=4。实际上,海因茨数为3的分区是[2];它的共轭物是[1,1],具有Heinz数4-Emeric Deutsch公司2015年5月19日
配方奶粉
a(1)=1,a(p_i)=2^i,对于其他情况,如果n=p_i1*p_i2*p_i3*…*p{k-1}*p_k,其中p是素数,不一定是不同的,按非降序排序,因此i1<=i2<=i3<=…<=i{k-1}<=ik,则a(n)=2^(ik-i{k-1{)*3^(i_{k-1}-i_{k-2})*…*p_{i_{k-1}}^(i2-i1)*p_ik^(i1)。
这可以作为一个循环来实现,基本情况a(1)=1,
然后使用以下三个备选公式中的任意一个:
(结束)
作为相关排列的组合:
其他身份。对于所有n>=1,以下条件成立:
(结束)
MAPLE公司
使用(数字理论):c:=proc(n)局部B,c:B:=proc;对于i到nops(P),如果j<=P[i],则为do:=c+1,否则为end-if-end-do:c结束过程:[seq(a(k),k=1..max(P))]结束过程:mul(ithprime(c(B(n))[q]),q=1。。nops(C(B(n))))结束过程:seq(C(n),n=1。。59); #Emeric Deutsch公司2015年5月9日
#第二个Maple项目:
a: =n->(l->mul(ithprime(相加(`if`(j<i,0,1),j=l)),i=1..最大值(l))(
[seq(numtheory[pi](i[1])$i[2],i=ifactors(n)[2])]):
数学
A122111号[1] = 1;A122111号[n_]:=模块[{l=#,m=0},时间@@Power@@@表[l-=m;l=删除案例[l,0];{素数@长度@l、 米=最小值@l}, 长度@活接头@l] ]&@Catenate[ConstantArray[PrimePi[#1],#2]&@@@因子整数@n]; 阵列[A122111号, 60] (*郑焕敏2016年8月22日*)
a[n_]:=函数[l,乘积[Prime[Sum[If[j<i,0,1],{j,l}]],{i,1,Max[l]}]][Flatten[Table[PrimePi[f[[1]]],[f[2]]}],{f,FactorInteger[n]}]]];
黄体脂酮素
(平价)A122111号(n) =如果(1==n,n,my(f=系数(n),es=Vecrev(f[,2]),is=concat(apply(primepi,Vecrev,f[,1]),[0]),pri=0,m=1);对于(i=1,#es,pri+=es[i];m*=prime(pri)^(是[i]-是[1+i]));(m) )\\安蒂·卡图恩2020年7月20日
(方案,三种替代定义安蒂·卡图恩的IntSeq-library)
(Python)
从sympy导入因子,prevprime,prime,素数
从运算符导入mul
定义a001222(n):如果n==1,则返回0,否则返回a00122二(n/素数(n)[0])+1
定义a064989(n):
f=因子(n)
如果n==1,则返回1,否则减少(mul,[1 if i==2,则返回原素数(i)**f[i]表示f中的i)
def a105560(n):如果n==1else素数,则返回1(a001222(n))
定义a(n):如果n==1,则返回1,否则返回105560(n)*a(a064989(n))
交叉参考
另请参阅A080576,A036036级,A001221号,A001222号,A061395号,A243503型,A056239号,A052126号,A003961号,A064989号,A071178号,A241917型,A241919型,A242378号,A242424型,A006530号,A105560号,A070003号,A102750号,A066829号,A028260型,A026424号,A244990型,A244991号,A244992号,A108951号,A181815号,A181819号,A181820号,A238745型,A238690型,A242421型.
其他相关排列:A048673号-A064216号,A244981型-A244982型,A244983型-A244984型,243287元-A243288型,A243505型-A243506型,A245613型-A245614型,A075157号,A075158号,A129594号,A069799号,A242415型,A245451型,A245452型,A245454型,此外A336321型&A336322飞机(由A225546型).
也可参见数组A350066【A(i,j)=A(A(i)*A(j))】。
1, 2, 3, 4, 5, 6, 9, 10, 7, 8, 15, 16, 11, 26, 21, 22, 13, 12, 27, 28, 25, 36, 81, 82, 19, 14, 45, 52, 125, 56, 39, 40, 29, 18, 33, 46, 17, 126, 99, 100, 31, 50, 51, 226, 41, 626, 129, 130, 89, 24, 63, 34, 35, 176, 87, 154, 59, 344, 825, 298, 115, 86, 189, 190, 43, 32, 105, 76, 23, 66, 57, 88, 53, 20
黄体脂酮素
(平价)
A003961号(n) =我的(f=系数(n));对于(i=1,#f~,f[i,1]=下一素数(f[i、1]+1));factorback(f);\\此函数来自米歇尔·马库斯
对于(n=110001,写入(“b245606.txt”,n,“”,245606元(n) ))
(方案,带有备忘录-宏定义)
交叉参考
类似的纠缠排列:A244319号,A156552号,A243071型,A243288型,243344元,A243346号,A244322号,A245604型,A245614型,A227413号,A237126号.
1, 2, 4, 3, 6, 7, 10, 5, 9, 11, 15, 12, 16, 18, 24, 8, 14, 17, 22, 19, 25, 28, 35, 20, 26, 29, 36, 31, 39, 44, 55, 13, 21, 27, 34, 30, 38, 42, 51, 32, 40, 45, 56, 50, 60, 67, 81, 37, 46, 47, 57, 52, 62, 68, 82, 59, 65, 72, 86, 79, 93, 105, 121, 23, 33, 41, 49, 48, 58, 66, 77, 53, 64, 71, 85, 76, 90, 99, 111, 61
1, 2, 4, 3, 8, 6, 5, 16, 9, 7, 11, 10, 32, 18, 13, 12, 17, 15, 22, 20, 35, 19, 66, 14, 24, 21, 34, 25, 23, 33, 31, 45, 63, 37, 27, 26, 41, 36, 29, 43, 69, 40, 134, 30, 47, 39, 44, 68, 71, 50, 38, 46, 67, 131, 28, 49, 42, 70, 64, 52, 92, 48, 127, 65, 61, 75, 55, 51, 89, 83, 73, 60
搜索在0.011秒内完成
查找|欢迎光临|维基|注册|音乐|地块2|演示|索引|浏览|网络摄像头
贡献新序列。或评论|格式|样式表|变换|超级搜索|最近
OEIS社区|维护人OEIS基金会。
许可协议、使用条款、隐私政策。.
上次修改时间:美国东部夏令时2024年9月21日07:45。包含376083个序列。(在oeis4上运行。)
|