显示1-1个结果(共1个)。
第页1
1, 2, 6, 12, 30, 60, 180, 210, 360, 420, 1260, 2310, 2520, 4620, 6300, 12600, 13860, 27720, 30030, 37800, 60060, 69300, 75600, 138600, 180180, 360360, 415800, 485100, 510510, 831600, 900900, 970200, 1021020, 1801800, 2910600, 3063060, 5405400
配方奶粉
除了1和2之外,形式为2^k(1)*3^k(2)*5^k(3)*的数*p(s)^k(s),其中p(s)是第s素数,k(i)>0表示i=1..s,k(i)-k(i-1)=0或1表示i=2..s和|{k(1),k(2),..,k(s-弗拉德塔·约沃维奇2007年6月14日
例子
对于s=4,有8个(通常是2^(s-1))这样的数字:210=2*3*5*7,420=2^2*3*5*7=(2*3*5*7)*2,1260=2^2*3^2*5*7=2,12600=2^3*3^2*5^2*7=(2*3*5*7)*(2*5*5)*2,37800=2^3*3^3*5^2*7=*(2*3*5)*(2*3)*2.
数学
清除[f];f[m_]:=f[m]=并集[Times@@@子集[FoldList[Times,1,Prime[Range[m]]][[1;;100]];f[10];f[m=11];而[f[m]!=f[m-1],m++];f[米](*让-弗朗索瓦·奥尔科弗,2014年3月3日*)(*或*)
pr[n_]:=乘积[素数[n+1-i]^i,{i,n}];小于等于[mx_]:=块[{ric,j=1},ric[n_,ip_,ex_]:=If[n<mx,块[{p=素数[ip+1]},If[ex==1,Sow@n];ric[n p^ex,ip+1,ex];如果[ex>1,ric[n p^(ex-1),ip+1,ex-1]]];Sort@Reap[母猪[1];而[pr[j]<mx,ric[2^j,1,j];j++]][[2,1]]];
黄体脂酮素
(PARI)是(n)=我的(o=估价(n,2),t);如果(o<1|n<2,返回(n==1));n> >=o;对于素数(p=3,t=估值(n,p);n/=p^t;如果(t>o|t<o-1,返回(0));如果(t==0,返回(n==1));o=t)\\查尔斯·格里特豪斯四世2015年10月22日
作者
比尔·麦克阿欣, Jun 05 2007, Jun 06 2007, Jul 06 2007, Aug 07 2007
扩展
我添加了Wikicommons图片的链接-比尔·麦克阿欣2009年9月16日
搜索在0.006秒内完成
|