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

 

标志
提示
(来自的问候整数序列在线百科全书!)
搜索: 编号:a140778
显示1-1个结果(共1个)。 第页1
    排序:关联|参考文献||被改进的|创建     格式:长的|短的|数据
A140778号 a(n)是序列中没有数字出现两次的最小正整数及其绝对第一差。 +0个
6
1, 3, 7, 12, 18, 8, 17, 28, 13, 27, 43, 19, 39, 60, 22, 45, 70, 26, 55, 85, 31, 63, 96, 34, 69, 105, 37, 77, 118, 42, 88, 135, 48, 97, 147, 52, 103, 156, 56, 113, 171, 59, 120, 184, 65, 131, 198, 71, 143, 216, 74, 149, 227, 79, 159, 240, 82, 165, 249, 86, 175, 265, 91, 183 (列表图表参考历史文本内部格式)
抵消
1,2
评论
此序列及其第一个差异包括每个正整数(正好一次)。
链接
阿洛伊斯·海因茨,n=1..10000时的n,a(n)表
例子
对于a(5),到达该点的序列是[1,3,7,12],具有绝对差异[2,4,5]。下一个数字不能是6,因为那么6将同时出现在序列和第一个差异中。由于采用了所有小于6的值,因此差值必须为正且至少为6。6个功的差,A(5)=18。
MAPLE公司
b: =proc()假结束:
a: =proc(n)选项记忆;局部k;
如果n=1,则b(1):=真;1
对于k,当b(k)或(t->b(t)或t=k)(abs(a(n-1)-k))做od时;
b(k),b(abs(a(n-1)-k)):=真值$2;k个
fi(菲涅耳)
结束时间:
seq(a(n),n=1..100)#阿洛伊斯·海因茨2015年5月14日
数学
a[n_]:=a[n]=模[{},如果[n==1,b[1]=真;1,对于[k=1,b[k]||函数[t,b[t]||t==k][Abs[a[n-1]-k]],k++];{b[k],b[Abs[a[n-1]-k]]}={真,真};k] ];表[a[n],{n,1100}](*Jean-François Alcover公司2017年1月22日之后阿洛伊斯·海因茨*)
黄体脂酮素
(PARI)IsInList(v,k)=对于(i=1,#v,如果(v[i]==k,return(1));return(0)IsInDiff(v,k)=对于(i=2,#v,if(abs(v[i]-v[i-1])==k,return;return(0)NextA140778(v)={local(i,d);如果(#v==0,return;对于(i=1100,v=concat(v,NextA140778(v)));v(v)
(PARI){u=0;a=1;对于(n=1,99,u+=1<<a;打印1(a“,”);对于(k=1,9e9,(位测试(u,k)||位测试(u,abs(a-k))||a==2*k)&&next;u+=1<abs(α-k);a=k;中断))}\\M.F.哈斯勒2015年5月13日
交叉参考
囊性纤维变性。A140779号,A081145号.
关键词
容易的,非n
作者
状态
经核准的
第页1

搜索在0.005秒内完成

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

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

最后修改时间:美国东部时间2024年4月19日12:14。包含371792个序列。(在oeis4上运行。)