A051912-OEIS公司

A051912号

a（n）是使任意三个有序项a（k）的和k≤n唯一的最小整数。

0, 1, 4, 13, 32, 71, 124, 218, 375, 572, 744, 1208, 1556, 2441, 3097, 4047, 5297, 6703, 7838, 10986, 12331, 15464, 19143, 24545, 28973, 34405, 37768, 45863, 50876, 61371, 68302, 77917, 88544, 101916, 122031, 131624, 148574, 171236, 197814

(列表;图表;参考;听;历史;文本;内部格式)

抵消

0,3

链接

柴华武，n=0..225时的n、a（n）表（罗伯特·以色列条款0..100）

例子

从{0,1,4}中选择的三个术语可以是0+0+0；0+0+1; 0+1+1; 1+1+1; 0+0+4; 0+1+4; 1+1+4; 0+4+4; 1+4+4; 4+4+4都是不同的（3*4*5/6=10个项），因此a（2）=4是0和1之后序列的下一个整数。

MAPLE公司

A[0]：=0:S:={0}:S2:={0}:S3:={0}：

我从1岁到40岁

对于A[i-1]中的x do

如果（map（t->t+x，S2）与S3={}相交）和（map

A[i]：=x；

S3:=S3并映射（t->t+x，S2）并映射（t->t+2*x，S）并{3*x}；

S2:=S2并映射（t->t+x，S）并{2*x}；

S： =S并集{x}；

打破

菲

操作系统

日期：

seq（A[i]，i=0..40）#罗伯特·伊斯雷尔2019年7月1日

数学

a[0]=0；a[1]=1；a[n_]：=a[n]=对于[A0=数组[a，n，0]；an=a[n-1]+1，真，an++，A1=Append[A0，an]；A2=压扁[表[A1[[{i，j，k}]]，{i，1，n+1}，{j，i，n+1}，{k，j，n+1}]，2]；A3=排序[Total/@A2]；如果[Length[A3]==长度[Union[A3]]，则返回[an]]]；表[an=a[n]；打印[“a（”，n，“）=”，an]；an，{n，0，38}](*Jean-François Alcover公司2016年11月24日*）

黄体脂酮素

（Python）

从itertools导入计数，islice

定义A051912号_gen（）：术语的#生成器

集合1，集合2，集合3，alist=set（），集合（），集（），[]

对于计数（0）中的k：

bset2，bset3={k<<1}，{3*k}

如果3*k不在aset3中：

对于aset1中的d：

如果在aset3中（m:=d+（k<<1））：

打破

b设置2.add（d+k）

b设置3.添加（m）

其他：

对于aset2中的d：

如果在aset3中（m:=d+k）：

打破

b设置3.添加（m）

其他：

产量k

alist.append（k）

基准1.add（k）

aset2 |=bset2

集合3|=bset3

A051912号_list=列表（岛屿(A051912号_发电机（），20））#柴华湖2023年9月1日

交叉参考

第3行，共行A365515型.

囊性纤维变性。A025582号,A036241号,A062065型.

上下文中的序列：A011936号 A037235号 A363256型*A060099型 A208638型 A173277号

相邻序列：A051909号 A051910号 A051911号*A051913号 A051914号 A051915号

关键词

非n,美好的

作者

沃特·梅森1999年12月17日

扩展

来自的更多条款野本直弘2001年7月22日

状态

经核准的