%I#4 2019年5月13日01:10:28
%S 1,1,1,2,1,1,1,1,2,1,2,3,2,1,1,2,1,1,2,1,1,1,1,1,1,3,1,2,2,1,1,1,
%温度2,2,3,1,3,1,1,3,1,1,1,1,2,2,2,1,1,4,2,1,1,1,3,3,1,4,1,1,2,
%U 1,2,3,1,1,1,1,1,5,1,1,2,1,1,3,1,1,1
%N排序的N的q签名。
%C每个正整数都有一个唯一的q因子(由A324924编码),将其转化为因子q(i)=素数(i)/i,i>0。例如:
%C 11=q(1)q(2)q(3)q(5)
%C 50=q(1)^3 q(2)^2 q(3)^2
%C 360=q(1)^6 q(2)^3 q(3)
%C行n是n的q因子分解中非零乘法的多集。例如,行11是(1,1,1,1),行360是(1,3,6)。
%e三角形开始:
%电子{}
%第1页
%e 1 1
%第2页
%e 11 11
%e 1 2
%e 1 2
%e三
%e 2 2
%e 1 1 2
%e 1 1 1 1
%e 1 3
%e 1 1 2
%e 1 3
%e 1 2 2
%第4页
%e 1 1 2
%e 2 3
%e 1 3
%e 1 1 3
%t difac[n_]:=如果[n==1,{},使用[{i=PrimePi[FactorInteger[n][[1,1]]]},排序[前缀[difac[n*i/Prime[i]],i]]];
%t表[Sort[Length/@Split[difac[n]]],{n,30}]
%Y行长度为A324923。
%Y行总和为A196050。
%Y行最大值为A109129。
%Y参见A118914、A324922、A324824、A324931、A324944、A325608、A325609、A325613、A325614、A325660。
%K nonn,标签
%O 1,4个
%A _Gus Wiseman_,2019年5月12日
|