|
|
|
|
#11通过N.J.A.斯隆2017年12月15日星期五17:36:09 EST |
| 作者
|
_杰森·厄尔斯(泽维语_35711(自动变速箱)雅虎.通用域名格式),_,2002年12月14日
|
|
|
讨论
|
12月15日星期五
| 17:36
| OEIS服务器以下为:https://oeis.org/edit/global/2722
|
|
|
|
#10通过查尔斯·格里特豪斯四世2013年11月21日星期四12:47:56 EST |
| 数学
|
lst={1};i=1;Do[If[EvenQ[n],AppendTo[lst,NextPrime[Last[lst]],AppedTo[ls,Total[Flatten[Integer Digits/@lst]]];i++,{n,60}];休息[lst] (*发件人 ] (* _哈维·P·戴尔,_,2011年9月3日*)
|
|
|
讨论
|
11月21日星期四
| 12:47
| OEIS服务器以下为:https://oeis.org/edit/global/2062
|
|
|
|
#9通过乔格·阿恩特2011年9月4日星期日03:07:32 EDT |
|
|
|
#8个通过哈维·P·戴尔2011年9月3日星期六14:20:29 EDT |
|
|
|
#7通过哈维·P·戴尔2011年9月3日星期六14:20:22 EDT |
|
|
|
#6通过哈维·P·戴尔2011年9月3日星期六14:20:17 EDT |
| 数学
|
lst={1};i=1;Do[If[EvenQ[n],AppendTo[lst,NextPrime[Last[lst]],AppedTo[ls,Total[Flatten[Integer Digits/@lst]]];i++,{n,60}];休息[lst](*摘自Harvey P.Dale,2011年9月3日*)
|
| 状态
|
经核准的
编辑
|
|
|
|
#5通过N.J.A.斯隆2009年1月9日星期五美国东部时间03:00:00 |
| 关键词
|
基础,容易的,非n,新的
|
| 作者
|
杰森·厄尔斯(杰瑟尔斯泽维语_35711(自动变速器)有线电视雅虎.网通用域名格式)2002年12月14日
|
|
|
|
#4通过N.J.A.斯隆2004年9月22日星期三美国东部夏令时03:00:00 |
| 关键词
|
基础,容易的,非n,新的
|
| 作者
|
杰森·厄尔斯(jcearls(AT))4克有线电视.通用域名格式网)2002年12月14日
|
|
|
|
#3通过N.J.A.斯隆2004年6月12日星期六美国东部夏令时03:00:00 |
| 关键词
|
基础,容易的,非n,新的
|
| 作者
|
杰森·厄尔斯(jcearls(AT))kskc公司4克.网通用域名格式)2002年12月14日
|
|
|
|
#2个通过N.J.A.斯隆2004年2月19日星期四美国东部时间03:00:00 |
| 黄体脂酮素
|
(PARI)数字(n)=局部(s,d);s=0;;而(n>0,d=divrem(n,10););n=d[1];];s=s+d[2]);]);s{sdnp(m)=局部(a=1,ct=0,lp=0,ls=0,sqc=0,sr=0,t=1);对于(n=1,m,如果(n%2==0,b=nextprime(a+1)););t+=数字(b););a=b;;计算机断层扫描++;++;打印1(b,“”);如果(发行方(b),sqc++;++;ls=b; );; );sr+=(1.0/b),b=t;;t+=数字(b););a=b;;打印1(b,“”);如果(isprime(b),ct++;++;lp=b; );; );如果(发行方(b),sqc++;++;ls=b; );; );sr+=(1.0/b); ));); ));打印();打印(结果);print(“Found”ct“primes<=”m);打印(“找到”sqc“方块<=”m);print(“奇数部分中的最后一个素数:”lp);print(“找到的最后一个方块:”ls);print(“素数与“m”之比为“ct/m+0.0”);print(“倒数总和=”sr); }); }
|
| 关键词
|
基础,容易的,非n,新的
|
|
|
|