登录
A090369号
2n的最小除数大于2,如果不存在这样的除数,则为0。
8
0, 4, 3, 4, 5, 3, 7, 4, 3, 4, 11, 3, 13, 4, 3, 4, 17, 3, 19, 4, 3, 4, 23, 3, 5, 4, 3, 4, 29, 3, 31, 4, 3, 4, 5, 3, 37, 4, 3, 4, 41, 3, 43, 4, 3, 4, 47, 3, 7, 4, 3, 4, 53, 3, 5, 4, 3, 4, 59, 3, 61, 4, 3, 4, 5, 3, 67, 4, 3, 4, 71, 3, 73, 4, 3, 4, 7, 3, 79, 4, 3, 4, 83, 3, 5, 4, 3, 4, 89, 3, 7, 4, 3, 4, 5
抵消
1,2
链接
MAPLE公司
A090369号:=proc(n)局部lf,i;lf:=理论值[除数](2*n);对于i从1到nops(lf),如果op(i,lf)>2,则执行RETURN(op(i、lf));fi;od;返回(0);结束:对于从0到100的n,执行printf(“%d,”,A090369号(n) );od#R.J.马塔尔2006年6月2日
数学
联接[{0},表[SelectFirst[Divisors[2n],#>2&],{n,2,120}]](*需要Mathematica版本10或更高版本*)(*哈维·P·戴尔2017年9月24日*)
关键词
非n,容易的
作者
Lekraj Beedassy公司2003年11月27日
扩展
更多术语来自雷·钱德勒2003年12月2日
编辑人N.J.A.斯隆根据…的建议雷米·艾斯曼2007年9月15日
状态
经核准的