搜索： a002843-编号：a002843
|
| |
| |
|
|
|
0, 1, 2, 4, 4, 8, 6, 11, 10, 14, 10, 22, 12, 20, 20, 26, 16, 33, 18, 36, 28, 32, 22, 52, 28, 38, 36, 50, 28, 64, 30, 57, 44, 50, 44, 82, 36, 56, 52, 82, 40, 88, 42, 78, 72, 68, 46, 114, 54, 87, 68, 92, 52, 112, 68, 112, 76, 86, 58, 156, 60, 92, 98, 120, 80, 136, 66, 120, 92
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
偏移
|
1,3
|
|
|
评论
|
丢番图方程xy+yz=n的解的个数，其中x，y，z>=1。
换句话说，对于正整数a，b，k，n=（a+b）*k的写入方式有很多-古斯·怀斯曼2021年3月25日
也可以将n的组分数转换为偶数个部分，且交替部分相等。这些是正整数的有限等长序列q与n相加，使得q（i）=q（i+2）对于所有可能的i。例如，a（2）=1到a（8）=11的组合是：
(1,1) (1,2) (1,3) (1,4) (1,5) (1,6) (1,7)
(2,1) (2,2) (2,3) (2,4) (2,5) (2,6)
(3,1) (3,2) (3,3) (3,4) (3,5)
(1,1,1,1) (4,1) (4,2) (4,3) (4,4)
(5,1) (5,2) (5,3)
(1,2,1,2) (6,1) (6,2)
(2,1,2,1) (7,1)
(1,1,1,1,1,1) (1,3,1,3)
(2,2,2,2)
(3,1,3,1)
(1,1,1,1,1,1,1,1)
（结束）
|
|
|
链接
|
M.Alekseyev、E.Deutsch和J.H.Steelman，问题11281的解决方案阿默尔。数学。《月刊》，第116期，第5期，2009年，第465页。
乔治·安德鲁斯，堆叠的格子盒安·库姆。3 (1999), 115-130. 参见L_2（n）。
|
|
|
配方奶粉
|
通用公式：和{k>=1}x^（2*k）/（1-x^k）^2-贝诺伊特·克洛伊特2003年4月21日
通用公式：和{n>=1}（n-1）*x^n/（1-x^n）-乔格·阿恩特2011年1月30日
L.g.f.：-log（产品{k>=1}（1-x^k）^（1-1/k））=和{n>=1}a（n）*x^n/n-伊利亚·古特科夫斯基2018年3月18日
G.f.：求和{n>=1}q^（n^2）*（（n-1）+q^n-（n-1-彼得·巴拉2021年1月22日
a（n）=n*A010054号（n） -Sum_{k>=1}a（n-k*（k+1）/2），假设n<=0时a（n）=0（Kobayashi，2022）-阿米拉姆·埃尔达尔2023年6月23日
|
|
|
MAPLE公司
|
|
|
|
数学
|
表[DivisorSigma[1，n]-DivisorSigma[0，n]{n，100}](*韦斯利·伊万·赫特2013年12月26日*）
|
|
|
黄体脂酮素
|
（PARI）a（n）=σ（n）-numdiv（n）\\哈里·史密斯2009年10月23日
（GAP）列表（[1..100]，n->Sigma（n）-Tau（n））#穆尼鲁·A·阿西鲁2018年3月19日
（Python）
来自数学导入产品
来自sympy导入因子
f=因子（n）.items（）
返回prod（（p**（e+1）-1）//（p-1）for p，e in f）-prod（e+1 for p，e in f）#柴华湖2022年7月16日
|
|
|
交叉参考
|
|
|
|
关键词
|
非n,容易的
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
|
| |
| |
|
|
|
1, 1, 2, 4, 6, 9, 14, 20, 26, 36, 47, 60, 80, 102, 127, 159, 194, 236, 291, 355, 425, 514, 611, 718, 856, 1009, 1182, 1381, 1605, 1861, 2156, 2496, 2873, 3299, 3778, 4301, 4902, 5574, 6325, 7176, 8116, 9152, 10317, 11610, 13028, 14611, 16354, 18259, 20365
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
偏移
|
0,3
|
|
|
评论
|
这些是具有弱递减的第一商的组成，其中序列的第一商被定义为该序列是一个递增的除数链，因此例如（6,3,1）的第一商是（1/2,1/3）-古斯·怀斯曼2021年3月16日
|
|
|
链接
|
|
|
|
例子
|
在4的8个成分中，只有2+1+1和1+1+2是非对数压缩的，因此a（4）=6。
a（1）=1到a（6）=14组分：
(1) (2) (3) (4) (5) (6)
(11) (12) (13) (14) (15)
(21) (22) (23) (24)
(111) (31) (32) (33)
(121) (41) (42)
(1111) (122) (51)
(131) (123)
(221) (132)
(11111) (141)
(222)
(231)
(321)
(1221)
(111111)
（结束）
|
|
|
数学
|
（*此程序不适合计算大量术语*）
复合[n_]：=排列/@IntegerPartitions[n]//展平[#，1]&；
logConcaveQ[p_]：=And@@Table[p[[i]]^2>=p[[i-1]*p[[i+1]]，{i，2，Length[p]-1}]；a[n_]：=计数[compos[n]，p_？logConcaveQ]；表[an=a[n]；打印[“a（”，n，“）=”，an]；a[n]，{n，0，25}](*Jean-François Alcover公司2016年2月29日*）
表[Length[Select[Join@@Permutations/@IntegerPartitions[n]，GreaterEqual@@Divide@@Reverse/@Partition[#，2，1]&]]，{n，0，15}](*古斯·怀斯曼，2021年3月15日*）
|
|
|
黄体脂酮素
|
（鼠尾草）定义A069916号（n） ：返回组合（n）中p的总和（范围（1，len（p）-1）中i的所有（p[i]^2>=p[i-1]*p[i+1]））#埃里克·施密特2013年9月29日
|
|
|
交叉参考
|
|
|
|
关键词
|
非n,美好的
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
|
| |
| |
|
|
|
1、1、2、2、3、5、5、7、7、10、10、13、13、18、18、23、23、30、37、37、47、57、57、70、83、83、101、101、119、119、142、142、165、165、195、195、225、225、262、262、299、299、346、346、393、393、450、450、507、507、577、647、730、813、914、1015、1015、1134、1134、1253、1253、1395、1395
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
偏移
|
0,3
|
|
|
评论
|
显然，a（n）=n+1的分区数（p_1，p_2，…，p_k），其中p_1>=p_2>=…>=p_k，这样对于每个i，p_i>p_{i+1}++p_k.-约翰·麦凯（mac（AT）mathstat.concordia.ca），2009年3月6日
John McKay的评论在Bessenrodt、Olsson和Sellers的论文中得到了证实。这种分区在本文中称为“强递减”分区，参见函数s（n）。
此外，具有2*n+3个节点的未标记二叉根树的数量，其中任何给定非叶节点下的两个分支或者相等，或者至少其中一个是叶-古斯·怀斯曼2018年10月8日
这个序列计算了以下两个基本等价的东西：
1.具有最大n+1的不同正整数的集合，其中所有相邻元素的商都小于1/2。例如，a（0）=1到a（8）=7子集为：
{1} {2} {3} {4} {5} {6} {7} {8} {9}
{1,3} {1,4} {1,5} {1,6} {1,7} {1,8} {1,9}
{2,5} {2,6} {2,7} {2,8} {2,9}
{3,7} {3,8} {3,9}
{1,3,7} {1,3,8} {4,9}
{1,3,9}
{1,4,9}
2.最大值为n+1的不同正整数集，它们的第一个差异项大于其斩首（去掉最大值）。例如，集合q={1,4,9}具有大于（1,4）的第一个差异（3,5），因此q在a（8）下计数。另一方面，r={1,5,9}有第一个差异（4,4），不大于（1,5），因此r不计入a（8）中。
也就是将n+1划分为2次幂的次数，覆盖2次幂初始间隔。例如，a（0）=1到a（8）=7分区是：
1 11 21 211 221 2211 421 4211 4221
111 1111 2111 21111 2221 22211 22221
11111 111111 22111 221111 42111
211111 2111111 222111
1111111 11111111 2211111
21111111
111111111
（结束）
|
|
|
链接
|
Christine Bessenrodt、Jorn B.Olsson和James A.Sellers，唯一路径分区：特征和同余，arXiv:1107.1156[math.CO]，2011-2012年。
|
|
|
配方奶粉
|
设T（x）为g.f，则T。[乔格·阿恩特2010年5月11日]
G.f.：总和（k>=1，x^（2^k-1）/prod（j=0..k-1，1-x^。
通用系数：1/（2*x^2）*（1/prod（k>=0，1-x^（2^k））-（1+x））。
（结束）
a（n）=T（n+1，1），其中T（n，m）=总和（k..0，（n-m）/2，二项式（n-2*k-1，n-2*k-m）*总和（i=1..k，二项性（m，i）*T（k，i））+二项式-弗拉基米尔·克鲁奇宁2015年3月19日
使用偏移量1:a（1）=1；a（n偶数）=a（n-1）；a（n奇数）=a（n-1）+a（n-1）/2）-古斯·怀斯曼2018年10月8日
|
|
|
例子
|
a（19-1）=30的19个强递减分区是（按字典顺序）
[ 1] [ 10 5 3 1 ]
[ 2] [ 10 5 4 ]
[ 3] [ 10 6 2 1 ]
[ 4] [ 10 6 3 ]
[ 5] [ 10 7 2 ]
[ 6] [ 10 8 1 ]
[ 7] [ 10 9 ]
[ 8] [ 11 5 2 1 ]
[ 9] [ 11 5 3 ]
[10] [ 11 6 2 ]
[11] [ 11 7 1 ]
[12] [ 11 8 ]
[13] [ 12 4 2 1 ]
[14] [ 12 4 3 ]
[15] [ 12 5 2 ]
[16] [ 12 6 1 ]
[17] [ 12 7 ]
[18] [ 13 4 2 ]
[19] [ 13 5 1 ]
[20] [ 13 6 ]
[21] [ 14 3 2 ]
[22][14 4 1]
[23] [ 14 5 ]
[24] [ 15 3 1 ]
[25] [ 15 4 ]
[26] [ 16 2 1 ]
[27] [ 16 3 ]
[28][17 2]
[29] [ 18 1 ]
[30] [ 19 ]
通过在列表中每个分区的第一部分添加1，可以获得20的a（20-1）=30个强递减分区。
（结束）
a（-1）=1到a（4）=3半手性二叉根树：
o（oo）
（o（o（oo））
（o（o（o（o（oo））））
（结束）
|
|
|
MAPLE公司
|
#例如，按非递增顺序写入的4的五个分区是
# [1, 1, 1, 1], [2, 1, 1], [2, 2], [3, 1], [4].
#只有最后两个满足条件，a（3）=2。
#下面的Maple程序对较小的n值进行了验证。
with（组合）；N： =8；a： =阵列（1..N）；c： =阵列（1..N）；
对于从1到n的n，做p:=分区（n）；np:=nops（p）；t： =0；
对于s到np，dor:=p[s]；r： =排序（r，`>`）；nr:=nops（r）；j： =1；
而j<nr和r[j]>和（r[k]，k=j+1…nr）做j:=j+1；od；编号给予A040039号
#而j<nr和r[j]>=总和（r[k]，k=j+1…nr）做j:=j+1；od；编号给予A018819号
如果j=nr，则t:=t+1；光纤；a[n]：=t；od；
#约翰·麦凯
|
|
|
数学
|
T[n_，m_]：=T[n，m]=和[二项式[n-2k-1，n-2k-m]和[二项式[m，i]T[k，i]，{i，1，k}]，{k，0，（n-m）/2}]+二项式[n-1，n-m]；
a[n]：=T[n+1，1]；
表[Length[Select[Subsets[Range[n]]，MemberQ[#，n]&&And@@表[#[i-1]]/#[i]]<1/2，{i，2，Length[#]}]&]]，{n，15}](*古斯·怀斯曼2021年4月6日*）
|
|
|
黄体脂酮素
|
b（n）=如果（n<2，1，b（楼层（n/2））+b（n-1））/*A033485美元*/
a（n）=b（n\2+1）；/*注意不同的偏移*/
对于（n=0，99，打印1（a（n），“，”）/*乔格·阿恩特2011年1月21日*/
（最大值）
T（n，m）：=和（二项式（n-2*k-1，n-2*k-m）*和（二项式（m，i）*T（k，i），i，1，k），k，0，（n-m）/2）+二项式；
（Python）
从itertools导入islice
从集合导入deque
渡槽，f，b，a=deque（[2]），真，1，2
（1，1，2，2）的产量
为True时：
a+=b
（a，a）的产量
附录（a）
如果f:b=aqueue.popleft（）
f=非f
|
|
|
交叉参考
|
|
|
|
关键词
|
非n,容易的
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
|
| |
| |
|
|
|
1, 1, 2, 4, 7, 12, 20, 32, 51, 79, 121, 182, 272, 399, 582, 839, 1200, 1700, 2394, 3342, 4640, 6397, 8771, 11955, 16217, 21878, 29386, 39285, 52301, 69334, 91570, 120465, 157929, 206313, 268644, 348674, 451185, 582074, 748830, 960676, 1229208, 1568716, 1997064
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
偏移
|
0,3
|
|
|
评论
|
这些是正整数的有限序列q与n之和，使得q（i）>=q（i+2）对于所有可能的i。
对。通过将奇数部分水平放置，偶数部分垂直放置在鱼骨模式中，构建费雷斯图。由此产生的费雷尔斯图将用于普通分区，并且该过程是可逆的。似乎这种方法不能用于给出这个序列的公式-安德鲁·霍罗伊德2021年3月25日
|
|
|
链接
|
|
|
|
例子
|
a（1）=1到a（6）=20组分：
（1） （2）（3）（4）（5）（6）
(11) (12) (13) (14) (15)
(21) (22) (23) (24)
(111) (31) (32) (33)
(121) (41) (42)
(211) (131) (51)
（1111）（212）（141）
(221) (222)
(311) (231)
(1211) (312)
(2111) (321)
(11111) (411)
(1212)
(1311)
(2121)
（2211）
(3111)
(12111)
(21111)
(111111)
|
|
|
数学
|
表[Length[Select[Join@@Permutations/@IntegerPartitions[n]，GreaterEqual@@Plus@@Reverse/@Partition[#，2，1]&]]，{n，0，15}]
|
|
|
黄体脂酮素
|
（PARI）序列（n）={my（p=1/prod（k=1，n，1-y*x^k+O（x*x^n））\\安德鲁·霍罗伊德2021年3月24日
|
|
|
交叉参考
|
囊性纤维变性。A001522号,A008965号,A048004型,A059966号,A062968号,A064410号,A064428号,2006年6月08日,A167606型,A325557型,342519美元.
|
|
|
关键词
|
非n
|
|
|
作者
|
|
|
|
扩展
|
|
|
|
状态
|
经核准的
|
| |
|
|
| |
| |
|
|
|
1, 1, 2, 4, 6, 8, 11, 12, 16, 17, 21, 20, 29, 24, 31, 32, 38, 32, 46, 36, 51, 46, 51, 44, 69, 51, 61, 60, 73, 56, 87, 60, 84, 74, 81, 76, 110, 72, 91, 88, 115, 80, 123, 84, 117, 112, 111, 92, 153, 101, 132, 116, 139, 104, 159, 120, 161, 130, 141, 116, 205, 120, 151, 156, 178, 142, 195, 132, 183, 158
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
偏移
|
0,3
|
|
|
评论
|
这些是正整数的有限序列q与n之和，使得q（i）=q（i+2）对于所有可能的i。
|
|
|
链接
|
|
|
|
配方奶粉
|
|
|
|
例子
|
a（1）=1到a（8）=16组分：
(1) (2) (3) (4) (5) (6) (7) (8)
(11) (12) (13) (14) (15) (16) (17)
(21) (22) (23) (24) (25) (26)
(111) (31) (32) (33) (34) (35)
(121) (41) (42) (43) (44)
(1111) (131) (51) (52) (53)
(212) (141) (61) (62)
(11111) (222) (151) (71)
(1212) (232) (161)
(2121) (313) (242)
(111111) (12121) (323)
(1111111) (1313)
(2222)
(3131)
(21212)
(11111111)
|
|
|
数学
|
表[Length[Select[Join@@Permutations/@IntegerPartitions[n]，SameQ@@Plus@@Reverse/@Partition[#，2，1]&]]，{n，0，15}]
|
|
|
交叉参考
|
囊性纤维变性。A001522号,A008965号,A048004型,A059966号,A064410号,A064428号,A069916号,A114921号,A167606型,A325545型,A325557型.
|
|
|
关键词
|
非n
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
|
| |
|
|
A342337飞机
|
| 所有相邻部分（x，y）满足x=y或x=2y的n的整数分区数。 |
|
+10
17
|
|
|
|
1, 1, 2, 3, 4, 4, 7, 6, 9, 10, 12, 11, 19, 14, 20, 24, 27, 24, 37, 31, 44, 45, 49, 48, 71, 61, 72, 80, 92, 84, 118, 102, 128, 132, 144, 151, 191, 166, 197, 211, 244, 226, 287, 263, 313, 330, 348, 347, 435, 399, 462, 476, 524, 508, 614, 591, 674, 680, 732, 731, 890, 814, 916, 966, 1042, 1032, 1188, 1135, 1280, 1303
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
偏移
|
0,3
|
|
|
链接
|
|
|
|
例子
|
a（1）=1到a（9）=10个分区：
1 2 3 4 5 6 7 8 9
11 21 22 221 33 421 44 63
111 211 2111 42 2221 422 333
1111 11111 222 22111 2222 4221
2211 211111 4211 22221
21111 1111111 22211 42111
111111 221111 222111
2111111 2211111
11111111 21111111
111111111
|
|
|
MAPLE公司
|
b： =proc（n，i）选项记忆`如果`（n=0，1，加上（b（n-j，j），
j=`if`（i=0，1..n，选择（x->x<=n，[i，2*i]））
结束时间：
a： =n->b（n，0）：
|
|
|
数学
|
表[Length[Select[Integer Partitions[n]，And@@表[#[i]]==#[[i-1]]||#[[i1]]==2*#[i]，{i，2，Length[#]}]&]]，{n，0，30}]
（*第二个节目：*）
b[n_，i_]：=b[n，i]=如果[n==0，1，总和[b[n-j，j]，
{j，如果[i==0，范围[n]，选择[{i，2i}，#<=n&]]}]]；
a[n]：=b[n，0]；
|
|
|
交叉参考
|
囊性纤维变性。A003114号,A003242号,A034296美元,A167606型,A342083型,A342084型,A342087型,A342191型,A342334飞机,A342336飞机,A342340型.
|
|
|
关键词
|
非n
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
|
| |
|
|
A224957号
|
| n的组分[p（1），p（2），…，p（k）]的数量，使得p（j）<=2*p（j-1）和p（j-1<=2*p（j）。 |
|
+10
16
|
|
|
|
1, 1, 2, 4, 6, 11, 19, 31, 54, 92, 154, 266, 454, 771, 1319, 2249, 3834, 6550, 11176, 19069, 32558, 55567, 94838, 161891, 276325, 471659, 805102, 1374234, 2345724, 4004031, 6834605, 11666260, 19913668, 33991462, 58021534, 99039592, 169055094, 288567886, 492569833, 840790082
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
偏移
|
0,3
|
|
|
链接
|
|
|
|
例子
|
有a（6）=19这样的6组分：
01: [ 1 1 1 1 1 1 ]
02：[1 1 1 1 2]
03: [ 1 1 1 2 1 ]
04: [ 1 1 2 1 1 ]
05: [ 1 1 2 2 ]
06: [ 1 2 1 1 1 ]
07: [ 1 2 1 2 ]
08：[1 2 2 1]
09: [ 1 2 3 ]
10: [ 2 1 1 1 1 ]
11: [ 2 1 1 2 ]
12: [ 2 1 2 1 ]
13: [ 2 2 1 1 ]
14: [ 2 2 2 ]
15: [ 2 4 ]
16: [ 3 2 1 ]
17:[33]第17页
18: [ 4 2 ]
19: [ 6 ]
|
|
|
MAPLE公司
|
b： =proc（n，i）选项记忆`如果`（n=0，1，添加(
b（n-j，j），j=`if`（i=0，1..n，ceil（i/2）。。最小值（n，2*i））
结束时间：
a： =n->b（n，0）：
|
|
|
数学
|
表[Length[Select[Join@@Permutations/@IntegerPartitions[n]，And@@Table[#[i]]<=2*#[[i-1]]&&#[[i]]<=2*#[i]，{i，2，Length[#]}]&]]，{n，15}](*古斯·怀斯曼2021年3月12日*）
b[n_，i_]：=b[n，i]=如果[n==0，1，总和[b[n-j，j]，{j，如果[i==0、范围[n]、范围[i/2]、最小值[n，2*i]]}]]；
a[n]：=b[n，0]；
|
|
|
交叉参考
|
|
|
|
关键词
|
非n
|
|
|
作者
|
|
|
|
扩展
|
|
|
|
状态
|
经核准的
|
| |
|
|
| |
|
|
A342330型
|
| 所有相邻部分（x，y）满足x<2y和y<2x的n组分的数量。 |
|
+10
16
|
|
|
|
1, 1, 2, 2, 3, 4, 4, 7, 9, 11, 17, 23, 32, 44, 63, 91, 127, 180, 255, 363, 516, 732, 1044, 1485, 2109, 3002, 4277, 6089, 8660, 12323, 17550, 24986, 35562, 50628, 72084, 102616, 146077, 207980, 296114, 421555, 600153, 854469, 1216543, 1731983, 2465842, 3510713
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
偏移
|
0,3
|
|
|
评论
|
相邻部分的每个商都在1/2到2之间（不含）。
|
|
|
链接
|
|
|
|
例子
|
a（1）=1到a（9）=11分区：
1 2 3 4 5 6 7 8 9
11 111 22 23 33 34 35 45
1111 32 222 43 44 54
11111 111111 223 53 234
232 233 333
322 323 432
1111111 332 2223
2222 2232
11111111 2322
3222
111111111
|
|
|
MAPLE公司
|
b： =proc（n，i）选项记忆`如果`（n=0，1，加上（b（n-j，j）
，j=“if”（i=0，1..n，楼层（i/2）+1..min（n，2*i-1）））
结束时间：
a： =n->b（n，0）：
|
|
|
数学
|
表[Length[Select[Join@@Permutations/@IntegerPartitions[n]，And@@Table[#[i]]<2*#[[i-1]]&&#[[i1]]<2*#[i]，{i，2，Length[#]}]&]]，{n，0，15}]
（*第二个节目：*）
b[n_，i_]：=b[n，i]=如果[n==0，1，总和[b[n-j，j]，{j，如果[i==0、1，楼层[i/2]+1]，如果[i==0；n，最小值[n，2i-1]}]]；
a[n]：=b[n，0]；
|
|
|
黄体脂酮素
|
（PARI）
C（n，pred）={my（M=匹配（n））；对于（k=1，n，对于（i=1，k-1，M[i，k]=和（j=1，k-i，if（pred（j，i），M[j，k-i]，0））；和（q=1，n，M[q，]）}
序列（n）={concat（[1]，C（n，（i，j）->i<2*j&&j<2*i））}\\安德鲁·霍罗伊德2021年3月13日
|
|
|
交叉参考
|
囊性纤维变性。A003114号,A003242号,A034296号,A167606型,A342083型,A342084型,A342087型,A342191型,A342333飞机,A342334飞机,A342336飞机,A342339型,A342340.
|
|
|
关键词
|
非n
|
|
|
作者
|
|
|
|
扩展
|
|
|
|
状态
|
经核准的
|
| |
|
|
| |
|
|
A342331飞机
|
| n的组成数，其中第一部分之后的每个部分是前一部分的两倍或一半。 |
|
+10
15
|
|
|
|
1, 1, 1, 3, 2, 2, 5, 4, 3, 9, 6, 4, 14, 9, 8, 22, 15, 11, 37, 24, 21, 58, 40, 30, 95, 67, 53, 157, 114, 85, 264, 187, 147, 428, 315, 244, 732, 527, 410, 1207, 892, 681, 2034, 1490, 1155, 3416, 2508, 1927, 5731, 4215, 3259, 9597, 7091, 5454, 16175, 11914, 9194, 27134, 20033, 15425, 45649, 33672, 25967, 76714
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
偏移
|
0,4
|
|
|
评论
|
相邻部分的所有商要么是1/2，要么是2。
|
|
|
链接
|
|
|
|
例子
|
a（1）=1到a（12）=14组分（a=10，B=11，C=12）：
1 2 3 4 5 6 7 8 9 A B C
12 121 212 24 124 242 36 424 21242 48
21 42 421 21212 63 12124 24212 84
1212 12121 1242 12421 2121212 363
2121 2124 42121 2424
2421 1212121 4242
4212 121242
121212 124212
212121 212124
212421
242121
421212
12121212
21212121
|
|
|
MAPLE公司
|
b： =proc（n，i）选项记忆`如果`（n=0，1，加上（b（n-j，j），j=
`如果`（i=0，1..n，选择（t->t:：integer和t<=n，{2*i，i/2}）））
结束时间：
a： =n->b（n，0）：
|
|
|
数学
|
表[Length[Select[Join@@Permutations/@IntegerPartitions[n]，And@@Table[#[i]]==2*#[[i-1]]||#[[i1]]==2*#[i]]，{i，2，Length[#]}]&]]，}，{n，0，15}]
（*第二个节目：*）
b[n_，i_]：=b[n，i]=如果[n==0，1，总和[b[n-j，j]，{j，如果[i==0的范围[n]，选择[{2i，i/2}，整数Q[#]&#<=n&]]}]]；
a[n]：=b[n，0]；
|
|
|
黄体脂酮素
|
（PARI）序列（n）={my（M=匹配（n））\\安德鲁·霍罗伊德2021年3月13日
|
|
|
交叉参考
|
|
|
|
关键词
|
非n
|
|
|
作者
|
|
|
|
扩展
|
|
|
|
状态
|
经核准的
|
| |
|
|
| |
|
|
A342332飞机
|
| 所有相邻部分（x，y）满足x>2y或y>2x的n的组成数。 |
|
+10
15
|
|
|
|
1, 1, 1, 1, 3, 4, 4, 7, 12, 17, 23, 34, 51, 75, 111, 164, 239, 350, 520, 767, 1123, 1652, 2439, 3587, 5263, 7745, 11411, 16789, 24695, 36347, 53489, 78686, 115779, 170390, 250711, 368866, 542783, 798713, 1175208, 1729189, 2544462, 3744077, 5509068, 8106165, 11927785, 17550956, 25824938, 37999743, 55914293, 82274088, 121060721
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
偏移
|
0,5
|
|
|
链接
|
|
|
|
例子
|
a（1）=1到a（9）=17组分：
(1) (2) (3) (4) (5) (6) (7) (8) (9)
(13) (14) (15) (16) (17) (18)
(31) (41) (51) (25) (26) (27)
(131) (141) (52) (62) (72)
(61) (71) (81)
(151) (152) (162)
(313) (161) (171)
(251) (252)
（314）（261）
(413) (315)
(1313) (414)
(3131) (513)
(1314)
(1413)
（3141）
(4131)
(13131)
|
|
|
MAPLE公司
|
b： =proc（n，i）选项记忆`如果`（n=0，1，加上（b（n-j，j），
j=选择（x->i=0或x>2*i或i>2*x，{$1..n}））
结束时间：
a： =n->b（n，0）：
|
|
|
数学
|
表[Length[Select[Join@@Permutations/@IntegerPartitions[n]，And@@Table[#[i]]>2*#[[i-1]]||#[[i1]]>2*#[i]]，{i，2，Length[#]}]&]]，}，{n，0，15}]
（*第二个节目：*）
b[n_，i_]：=b[n，i]=如果[n==0，1，总和[b[n-j，j]，{j，选择[Range[n]，i==0||#>2i|i>2#&]}]；
a[n]：=b[n，0]；
|
|
|
交叉参考
|
|
|
|
关键词
|
非n
|
|
|
作者
|
|
|
|
扩展
|
|
|
|
状态
|
经核准的
|
| |
|
搜索在0.037秒内完成
|
