|
0, 0, 0, 0, 0, 0, 0, 2, 3, 0, 0, 6, 0, 0, 6, 16, 0, 21, 0, 12, 10, 0, 0, 48, 16, 0, 81, 20, 0, 48, 0, 104, 15, 0, 30, 162, 0, 0, 21, 104, 0, 90, 0, 30, 198, 0, 0, 336, 65, 124, 28, 42, 0, 603, 50, 190, 36, 0, 0, 396, 0, 0, 405, 688, 77, 150, 0, 56, 45, 260, 0
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,8
|
|
评论
|
这个多集通常与n的素指数的多集不同。例如,12的素指数是{1,1,2},而重数是{1,1,2}的多集是{1,2,3}。
如果整数序列是弱递增序列和弱递减序列的串联,则它是单峰的。
|
|
链接
|
|
|
配方奶粉
|
|
|
例子
|
n=8,9,12,15,16的a(n)置换:
213 1212 1213 11212 1324
312 2112 1312 12112 1423
2121 2113 12121 2134
2131 21112 2143
3112 21121 2314
3121 21211 2413
3124
3142
3214
3241
3412
4123
4132
4213
4231
4312
|
|
数学
|
nrmptn[n_]:=Join@@MapIndexed[Table[#2[[1]],{#1}]&,如果[n==1,{},压扁[Cases[FactorInteger[n]//反转,{p_,k_}:>表[PrimePi[p],{k}]]];
unimodQ[q_]:=或[Length[q]<=1,如果[q[[1]]<=q[2]],unimodQ[静止[q]],有序q[反转[q]]];
表[Length[Select[Permutations[nrmptn[n]]!unimodQ[#]&]],{n,30}]
|
|
交叉参考
|
囊性纤维变性。A007052号,A008480号,A056239号,A112798号,A124010型,A181819号,A181821号,A332281型,A332287型,A332294,A332642飞机,A332741美元.
|
|
关键词
|
非n
|
|
作者
|
|
|
状态
|
经核准的
|
|