登录
OEIS由OEIS基金会的许多慷慨捐赠者.

 

标志
提示
(来自的问候整数序列在线百科全书!)
A025487号 每个素数签名的最小整数A124832号; 也是原始数的乘积A002110号. 582
1, 2, 4, 6, 8, 12, 16, 24, 30, 32, 36, 48, 60, 64, 72, 96, 120, 128, 144, 180, 192, 210, 216, 240, 256, 288, 360, 384, 420, 432, 480, 512, 576, 720, 768, 840, 864, 900, 960, 1024, 1080, 1152, 1260, 1296, 1440, 1536, 1680, 1728, 1800, 1920, 2048, 2160, 2304, 2310 (列表;图表;参考文献;;历史;文本;内部格式)
抵消
1,2
评论
形式为2^k1*3^k2*的所有数字*p_n^k_n,其中k1>=k2>=…>=kN,已排序。
A111059号是一个子序列-莱因哈德·祖姆凯勒2010年7月5日
Choie等人(2007)将这些称为“Hardy-Ramanujan整数”-Jean-François Alcover公司2014年8月14日
指数k1,k2。。。Abramowitz&Stegun第831页,标有“pi”的栏。
对于所有这样的序列b,它认为b(n)=b(A046523号(n) ),给出b中记录索引的序列是该序列的子序列。例如,A002182年它给出了A000005号,A002110号这给了他们A001221号A000079号这给了他们A001222号. -安蒂·卡图恩2019年1月18日
对应于a(n)的素数签名在A124832号. -M.F.哈斯勒2019年7月17日
链接
富兰克林·T·亚当斯-沃特斯,n=1..10001时的n,a(n)表(Will Nicholes的前291个学期)
M.Abramowitz和I.A.Stegun编辑。,数学函数手册,国家标准局,应用数学。系列55,第十次印刷,1972年。
凯文·布劳恩,黎曼假设的等价物,第1卷:算术等价物,剑桥大学出版社,2017年。见第8.2节,“哈代-拉马努扬数”。
YoungJu合唱团、Nicolas Lichiardopol、Pieter Moree和Patrick Solé,关于黎曼假设的罗宾判据《波尔多命名期刊》,第19卷,第2期(2007年),第357-372页。见第5节,第367页。
阿萨夫·科恩·安东尼尔和阿萨夫·夏皮拉,Hardy和Ramanujan一个定理的初等证明(2022). arXiv:2207.09410[数学.NT]
史蒂文·芬奇,数学常数的勘误表和补遗,arXiv:2001.00578[math.HO],2020,第9-10页。
G.H.Hardy和S.Ramanujan,各种类型整数分布的渐近公式,程序。伦敦数学。Soc,爵士。2,第16卷(1917年),第112-132页。还出版于1962年切尔西斯里尼瓦萨·拉马努扬的论文集,第245-261页。
杰弗里·克莱恩,与素数定理相关的稀疏矩阵的特征结构《线性代数及其应用》(2020)第584、409-430卷。
L.B.里士满,分区(I)的渐近结果和某些整数的分布《数论杂志》,第8卷,第4期(1976年),第372-389页。参见第388页。
配方奶粉
关于这个序列的渐近行为可以说什么-富兰克林·T·亚当斯-沃特斯2010年1月6日
Hardy和Ramanujan证明了这个序列在x之前有exp((2Pi+o(1))/sqrt(3)*sqrt(log x/log log x))成员-查尔斯·格里特豪斯四世2012年12月5日
发件人安蒂·卡图恩2019年1月18日和12月24日:(开始)
A085089号(a(n))=n。
1996年12月1日(a(n))=n[这是n在1996年12月1日,因此也是一个记录。]
A001221号(a(n))=A061395号(a(n))=A061394号(n) ●●●●。
A007814号(a(n))=A051903号(a(n))=A051282号(n) ●●●●。
一个(1996年12月1日(n) )=A046523号(n) ●●●●。
一个(A306802型(n) )=A002182年(n) ●●●●。
a(n)=A108951号(A181815号(n) )=A329900型(A181817号(n) )。
如果A181815号(n) 是奇数,a(n)=A283980型(a)(A329904型(n) ),否则a(n)=2*a(A329904型(n) )。
(结束)
和{n>=1}1/a(n)=Product{n>=1}1/(1-1/A002110号(n) )=A161360型. -阿米拉姆·埃尔达尔,2020年10月20日
例子
前几个术语是1、2、2^2、2*3、2^3、2*2*3,2^4、2^3*3、2*3*5。。。
MAPLE公司
isA025487:=进程(n)
局部集,ω;
集合:=排序(转换(numtheory[factorset](n),列表));
ω:=nops(集合);
如果op(-1,pset)<>ithprime(Ω),则
返回false;
结束条件:;
对于i从1到omega-1 do
如果padic[ordp](n,ithprime(i))<padic[0rdp](n,ithprice(i+1)),则
返回false;
结束条件:;
结束do:
真;
结束进程:
A025487号:=进程(n)
选项记忆;
局部a;
如果n=1,则
1 ;
其他的
对于来自procname(n-1)+1 do的a
如果是A025487(a),则
返回a;
结束条件:;
结束do:
结束条件:;
结束进程:
序列号(A025487号(n) ,n=1..100)#R.J.马塔尔2017年5月25日
数学
PrimeExponents[n_]:=最后/@FactorInteger[n];lpe={};ln={1};做[pe=排序@PrimeExponents@n;如果[FreeQ[lpe,pe],AppendTo[lpe、pe];附加到[ln,n]],{n,2,2350}];在(*罗伯特·威尔逊v2004年8月14日*)
(*第二个程序:生成所有术语m<=A002110号(n) :*)
f[n_]:={{1}}~连接~
块〔{lim=乘积〔Prime@i,{i,n}〕,
ww=NestList[Append[#,1]&,{1},n-1],dec},
dec[x_]:=应用[Times,MapIndexed[Prime[First@#2]^#1&,x]];
地图[块[{w=#,k=1},
排序@Prepend[If[Length@#==0,#,#[[1]]],
乘积[Prime@i,{i,Length@w}]&@Reap[
做[
如果[#<lim,
母猪[#];k=1,
如果[k>=Length@w,Break[],k++]]&@dec@Set[w,
如果[k==1,
地图位置[#+1&,w,k],
PadLeft[#,Length@w,First@#]&@
拖放[MapAt[#+Boole[i>1]&,w,k],k-1]],
{i,无穷}]][[-1]]
]&,网址]];排序[加入@@f@13](*迈克尔·德弗利格2018年5月19日*)
黄体脂酮素
(PARI)是A025487(n)=我的(k=估价(n,2),t);n> >=k;forprime(p=3,默认(primelimit),t=估值(n,p);如果(t>k,返回(0),k=t);如果(k,n/=p^k,返回(n==1))\\查尔斯·格里特豪斯四世,2011年6月10日
(PARI)factfollow(n)={本地(fm,np,n2);
fm=系数(n);np=材料尺寸(fm)[1];
如果(np==0,返回([2]));
n2=n*下一素数(fm[np,1]+1);
如果(np==1 |fm[np,2]<fm[nb-1,2],[n*fm[nf,1],n2])}
al(n)={局部(r,ms);r=矢量(n);
毫秒=[1];
对于(k=1,n,
r[k]=毫秒[1];
ms=vecsort(concat(向量(#ms-1,j,ms[j+1]),factfollow(ms[1]));
r}(右})/*富兰克林·T·亚当斯-沃特斯2011年12月1日*/
(PARI)是(n)={if(n==1,return(1));my(f=factor(n));f[#f~,1]==素数(#f~)&vecsort(f[,2],4)==f[,2]}\\大卫·A·科内斯2019年2月14日
(PARI)小于等于(Nmax)=vecsort(concat(向量(logint(Nmax2),n,select(t->t<=Nmax,if(n>1,[factorback(primes(#p),Vecrev(p))|p<-partitions(n)],[1,2]))))\\M.F.哈斯勒2019年7月17日
(PARI)
\\要快速生成大量术语,请使用此程序:
A283980型(n) ={my(f=因子(n));prod(i=1,#f~,my(p=f[i,1],e=f[i,2]);if(p=2,6,nextprime(p+1))^e)};\\发件人A283980型
A025487list(e)={my(lista=列表([1,2]),i=2,u=2^e,t);while(lista[i]!=u,if(2*lista[i]<=u,listput(lista,2*lista[i]);t=A283980型(列表[i]);如果(t<=u,listput(lista,t));i++);vecsort(Vec(列表));};\\返回术语2^e之前的术语列表。
v025487=A025487列表(101);
A025487号(n) =v025487【n】;
用于(n=1,#v025487,打印1(A025487号(n) ,“,”)\\安蒂·卡图恩2019年12月24日
(哈斯克尔)
导入数据。集合(singleton、fromList、deleteFindMin、union)
a025487 n=a025487_列表!!(n-1)
a025487_list=1:h[b](singleton b)bs,其中
(_:b:bs)=a002110_列表
h cs s xs'@(x:xs)
|m<=x=m:h(m:cs)(s''union`fromList(map(*m)cs))xs'
|否则=x:h(x:cs)(s`union` fromList(map(*x)(x:cs))xs
其中(m,s')=删除查找最小值
(鼠尾草)
def sharp_primorial(n):返回斯隆。A002110号(素数pi(n))
N=2310
nmax=2^层(对数(N,2))
如果j<=n],则排序([j代表j in(prod(sharp_primorial(t[0])^t[1]代表k,t in enumerate(factor(n)))代表n in(1..nmax))
#朱塞佩·科波列塔2015年1月26日
交叉参考
囊性纤维变性。A085089号,1996年12月1日(左反转)。
等于取值范围A046523号.
囊性纤维变性。A178799号(第一个差异),A247451型(无平方内核),A146288号(除数)。
同样参考数组A124832号(第n行=a(n)的质数签名)和A304886型,A307056型.
关键字
非n,容易的,美好的,核心
作者
扩展
偏移校正者马修·范德马斯特2008年10月19日
轻微修正查尔斯·格里特豪斯四世2010年9月3日
状态
经核准的

查找|欢迎光临|维基|注册|音乐|地块2|演示|索引|浏览|更多|网络摄像头
贡献新序列。或评论|格式|样式表|变换|超级搜索|最近
OEIS社区|维护人OEIS基金会。

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

上次修改时间:美国东部时间2024年4月24日00:30。包含371917个序列。(在oeis4上运行。)