登录
这个网站是通过捐款来支持的。OEIS基金会.

 

标志


提示
问候整数序列的在线百科全书!)
A109852 A(1)=1;A(2)=2;对于n>=1和1 <= k<2 ^ n,A(2 ^ n+k)是a(2 ^ n k)的最小乘数,未包含较早,a(2 ^ n)是未包含的最小数。
1, 2, 3、4, 6, 8、5, 7, 10、16, 12, 20、9, 14, 11、13, 22, 28、18, 40, 24、32, 30, 21、15, 48, 36、44, 27, 26、17, 19, 34、52, 54, 88、52, 54, 88、y、y、y、y、y、y、y、y、γ、y、γ、γ 列表图表参考文献历史文本内部格式
抵消

1,2

评论

每一个数字出现,没有重复的数字。

猜想:A(2 ^ n)是素数,如果n不是0,也不是2。

猜想:对于n>2,每个奇数素数>4在A(2 ^ n-1),A(2 ^ n)处遇到。-比尔·麦克拉钦06五月2014

链接

Alois P. Heinzn,a(n)n=1…10000的表

自然数排列序列的索引条目

例子

A(8)=7,最小的数不包含在前面。A(9)=2*A(8)=2*5=10,

A(10)=2*A(6)=16,A(11)=2*A(5)=12,A(12)=5*A(4)=20为20和γ。

枫树

did := [1]; lef := []; for n from 2 to 1000 do lef := [op(lef), n]; od : tak2n := proc(n2n) local i; global lef; i := op(1, lef); lef := subsop(1=NULL, lef); RETURN(i); end : tak := proc(n2n) local noffs, need, lefi, nindx, aa, mul; global lef, did; for noffs from -1 to -n2n+1 by -1 do nindx := n2n+noffs; aa := did[nindx]; for mul from 2 to 10000 do need := aa*mul; if member(need, lef, 'lefi') = true then break; fi; od : lef := subsop(lefi=NULL, lef); printf("%d, ", need); did := [op(did), need]; od : RETURN(ret); end : printf("1, "); for bas from 1 to 5 do nstrt := 2^bas; a := tak2n(nstrt); printf("%d, ", a); did := [op(did), a]; tak(nstrt); od : #马塔尔3月27日2006

第二枫叶计划:

INA:= PROC(n)EVALB(n<3)结束:

A:= PROC(n)选项记忆;局部k,i,t;

如果n<3,则n

否则A(N-1);

K:= N-2^ ILOG2(n);

t:=“If”(k=0, 1,a(n-2*k));

I为2×T,而INA(I)为OD;

INA(I):=真;I

FI

结束:

SEQ(A(n),n=1…70);阿洛伊斯·P·海因茨,07月2日2011

Mathematica

F[Sy]:=块[{K=2,Le=长度@ s},Exp=天花板[log [2,LeN] ];m=[[ 2,EX-LEN +1 ] ];同时[MeNeq[s,k*M],k++];REST嵌套[f,{1, 1 },70 ](*编程技巧是设置A(0)=1*)(*)Robert G. Wilson五世*)

交叉裁判

囊性纤维变性。A109853A308301(逆)

语境中的顺序:A120 817 A166310 A29 3030*A083197 A355262 A245704

相邻序列:A109849 A109850 A109851*A109853 A109854 A109855

关键词

诺恩

作者

阿马纳思穆西,朱尔07 2005

扩展

更多条款马塔尔3月27日2006

通过编辑和扩展Robert G. Wilson五世6月14日2006

地位

经核准的

查找γ欢迎γ维基γ注册γ音乐γ情节2γ演示γ指数γ浏览γ更多γ网络摄像机
贡献新的SEQ。或评论γ格式γ样式表γ变换γ超级导引头γ最近
OEIS社区通过保持OEIS基金会

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

最后修改9月15日0:57 EDT 2019。包含327062个序列。(在OEIS4上运行)