OEIS哀悼西蒙斯感谢西蒙斯基金会支持包括OEIS在内的许多科学分支的研究。
登录
OEIS由OEIS基金会的许多慷慨捐赠者.

 

标志
提示
(来自的问候整数序列在线百科全书!)
18906年 a(0)=1;如果n不是序列的早期项之一,则a(n)=a(n-1)-n,否则a(n。 1
1, 2, 4, 1, 5, 10, 4, 3, 5, 4, 14, 3, 9, 4, 18, 3, 13, 4, 22, 3, 17, 4, 26, 3, 21, 4, 30, 3, 25, 4, 34, 3, 29, 4, 38, 3, 33, 4, 42, 3, 37, 4, 46, 3, 41, 4, 50, 3, 45, 4, 54, 3, 49, 4, 58, 3, 53, 4, 62, 3, 57, 4, 66, 3, 61, 4, 70, 3, 65, 4, 74, 3, 69, 4, 78, 3, 73, 4, 82, 3, 77, 4, 86, 3, 81, 4 (列表;图表;参考;;历史;文本;内部格式)
抵消
0,2
链接
MAPLE公司
a[0]:=1:S:={1}:对于从1到100的n,do如果成员(n,S)=false,则a[n]:=abs(a[n-1]-n):S:=S联合{a[n]}否则a[nneneneea:=a[n-1]+n:S:=S联合{a[n]{fiod:seq(a[n],n=0..100)#Emeric Deutsch公司2006年5月7日
数学
f[s_]:=块[{n,},n=长度[s];返回[Append[s,Abs[Last[s]+If[MemberQ[s,n],+n,-n]]];];嵌套[f,{1},100](*雷·钱德勒2006年5月6日*)
交叉参考
囊性纤维变性。A005132号A118907号.
关键词
容易的非n
作者
勒罗伊·奎特2006年5月5日
扩展
由扩展雷·钱德勒Emeric Deutsch公司2006年5月6日
状态
经核准的

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

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

上次修改时间:美国东部夏令时2024年5月28日20:33。包含372919个序列。(在oeis4上运行。)