搜索: 编号:a109852
|
|
A109852号
|
| a(1)=1;a(2)=2;对于n>=1和1<=k<2^n,a(2^n+k)是前面未包括的a(2~n-k)的最小倍数,a(2 ^n)是前面没有包括的最小数字。 |
|
+0 三
|
|
|
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, 72, 96, 45, 42, 60, 64, 120, 80, 90, 56, 66, 39, 33, 70, 63, 100, 84, 112, 50, 35, 25, 104, 78, 68, 51, 38, 23, 29, 46, 76, 102, 136, 156, 208
(列表;图表;参考文献;听;历史;文本;内部格式)
|
|
|
抵消
|
1,2
|
|
评论
|
每个数字都会出现,没有数字重复。
猜想:如果n既不是0也不是2,则a(2^n)是素数。
猜想:对于n>2,每一个奇数素数>4都会在a(2^n-1),a(2*n)处依次出现-比尔·麦克阿欣2014年5月6日
|
|
链接
|
|
|
例子
|
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,因为已经包括了8、12和16。
|
|
MAPLE公司
|
已完成:=[1];左:=[];对于从2到1000的n,do lef:=[op(lef),n];od:tak2n:=进程(n2n)本地i;全局lef;i:=op(1,左);lef:=底土(1=NULL,lef);回报(i);end:tak:=proc(n2n)本地noff,need,lefi,nindx,aa,mul;全球lef,dod;对于从-1到-n2n+1乘-1的noffs,执行nindx:=n2n+noffs;aa:=做了[nidx];对于从2到10000的mul,确实需要:=aa*mul;如果member(need,lef,'lefi')=true,则中断;fi;od:lef:=底土(lefi=NULL,lef);printf(“%d,”,需要);did:=[op(did),need];od:返回(ret);结束:printf(“1,”);对于从1到5的bas,请执行nstrt:=2^bas;a:=tak2n(nstrt);printf(“%d,”,a);did:=[操作(完成),a];tak(nstrt);日期:#R.J.马塔尔2006年3月27日
#第二个Maple项目:
ina:=过程(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));
当ina(i)做od时,i从2*t到t;
ina(i):=真;我
fi(菲涅耳)
结束时间:
|
|
数学
|
f[s_]:=块[{k=2,len=长度@s},exp=上限[Log[2,len]];m=s[[2^exp-长度+1]];而[MemberQ[s,k*m],k++];追加[s,k*m]];休息@休息[f,{1,1},70](*编程技巧是设置a(0)=1*)(*罗伯特·威尔逊v*)
|
|
交叉参考
|
|
|
关键字
|
|
|
作者
|
|
|
扩展
|
|
|
状态
|
经核准的
|
|
|
搜索在0.007秒内完成
|