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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A321468飞机 n!的因子分解数!将从2到n的每个正整数的因子选择的多集并转化为因子>1。 6
1、1、1、2、2、4、4、10、20、40、40、116、116、232、464、1440、1440、4192、4192、11640、23280、46560、46560、157376 (列表;图表;参考;;历史;文本;内部格式)
抵消
0,5
评论
a(n)是n的分解偏序集中小于(2*3*…*n)的分解数!因子>1,按细化排序。
链接
例子
a(2)=1到a(8)=10分解:
2 2*3 2*3*4 2*3*4*5 2*3*4*5*6 2*3*4*5*6*7 2*3*4*5*6*7*8
2*2*2*3 2*2*2*3*5 2*2*2*3*5*6 2*2*2*3*5*6*7 2*2*2*3*5*6*7*8
2*2*3*3*4*5 2*2*3*3*4*5*7 2*2*3*3*4*5*7*8
2*2*2*2*3*3*5 2*2*2*2*3*3*5*7 2*2*3*4*4*5*6*7
2*2*2*2*3*3*5*7*8
2*2*2*2*3*4*5*6*7
2*2*2*3*3*4*4*5*7
2*2*2*2*2*2*3*5*6*7
2*2*2*2*2*3*3*4*5*7
2*2*2*2*2*2*2*3*3*5*7
例如,2*2*2x2*2*3*5*6*7=(2)*(3)*(2*2)*。
数学
facs[n_]:=如果[n<=1,{{}},连接@@表[Map[Prepend[#,d]&,Select[facs[n/d],Min@@#>=d&]],{d,Rest[Divisors[n]]}];
表[Length[Union[Sort/@Join@@@Tuples[facs/@Range[2,n]]],{n,10}]
交叉参考
主导者A321514型.
关键词
非n,更多
作者
古斯·怀斯曼2018年11月11日
状态
经核准的

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

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

上次修改时间:美国东部夏令时2024年5月12日14:44。包含372481个序列。(在oeis4上运行。)