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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A256794型 的第一个差异A256792型. 2
3, 2, 1, 2, 2, 2, 1, 2, 1, 3, 2, 1, 2, 1, 2, 3, 2, 1, 2, 1, 2, 2, 3, 2, 1, 2, 3, 2, 2, 3, 2, 1, 2, 2, 3, 2, 2, 3, 2, 1, 2, 1, 3, 3, 2, 2, 3, 2, 1, 2, 2, 1, 3, 3, 2, 2, 3, 2, 1, 2, 2, 2, 1, 3, 3, 2, 2, 3, 2, 1, 2, 1, 3, 2, 1, 3, 3, 2, 2, 3, 2, 1, 2, 3, 3, 2 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,1
链接
例子
R(0)=0;
R(1)=1;
R(2)=4-2;
R(3)=4-1;
R(4)=4;
R(5)=9-4。
数学
b[n]:=n^2;bb=表格[b[n],{n,0,1000}];(*正方形作为基础*)
s[n_]:=表[b[n],{k,1,2n-1}];
h[1]={1};h[n_]:=连接[h[n-1],s[n]];
g=小时[100];r[0]={0};r[1]={1};r[2]={4,-2};
r[n_]:=如果[MemberQ[bb,n],{n},连接[{g[n]]},-r[g[[n]-n]]];
表[r[n],{n,0,120}];(*A256789型*)
u=压扁[Table[Last[r[n]],{n,11000}]];(*A256791型*)
u1=选择[Range[800],u[[#]]>0&];(*A256792型*)
u2=选择[Range[800],u[[#]]<0&];(*A256793型*)
差异[u1](*256794英镑*)
差异[u2](*A256795型*)
交叉参考
关键字
非n,容易的
作者
克拉克·金伯利2015年4月13日
状态
经核准的

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

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

上次修改时间:2024年4月24日15:57 EDT。包含371961个序列。(在oeis4上运行。)