A284342-OEIS公司

284342英镑

数字n是这样的A065642号（n） <n*lpf（n），其中lpf=最小素因子(A020639号).

12, 18, 24, 36, 40, 45, 48, 50, 54, 56, 60, 63, 72, 75, 80, 84, 90, 96, 98, 100, 108, 112, 120, 126, 132, 135, 144, 147, 150, 156, 160, 162, 168, 175, 176, 180, 189, 192, 196, 198, 200, 204, 208, 216, 224, 225, 228, 234, 240, 242, 245, 250, 252, 264, 270, 275, 276, 280, 288, 294, 297, 300 (列表;图表;参考;听;历史;文本;内部格式)

	抵消	`1,1`
	评论	`其中的数字nA065642号（n）<2009年2月25日（n） ●●●●。术语的位置>1英寸A285337型. -Antti Karttunen公司2017年4月19日` `对于这个序列中的任何n，kn也在这个序列中。没有一项是无平方的。对于p>q的任何不同素数p和q，p^2q和p*q^（上限（log_q（p）））都在这个序列中-查理·内德2018年10月29日`
	链接	`安蒂·卡图恩，n=1..10000时的n，a（n）表`
	数学	`选择[Range[2，300]，Function[{n，c，lpf}，SelectFirst[Range[n+1，n^2]，Times@@FactorInteger[#][[All，1]]==c&]<n lpf]@@{#1，Times@@#2，#2[[1]]}&@@{#，FactorIntiger[#][[All，1]}&](迈克尔·德弗利格2018年10月31日）`
	黄体脂酮素	`（PARI）对于（n=1300，对于（k=1，n^2-n，a=factorback（factorant（n）[，1]））；b=因子回复（因子（n+k）[，1]）；c=vecmin（系数（n）[，1]）；如果（a==b&&n+k<nc&！打印1（n“，”）&中断））` `（PARI）` `A020639号（n） =如果（1==n，n，vecmin（因子（n）[，1]）；` `A007947号（n） =因子回复（因子（n）[，1]）；\\发件人安德鲁·莱莱琴科2014年5月9日` `A065642号（n） ={my（r=A007947号（n））；如果（1==n，n，n=n+r；while(A007947号（n） <>r，n=n+r）；n）；}；` `是A284342（n）=(A065642号（n） <nA020639号（n））；` `n=0；k=1；while（k<=10000，n=n+1；如果（isA284342（n）），则写入（“b284342.txt”，k，“”，n）；k=k+1））；` `\\Antti Karttunen公司2017年4月19日` `（Python）` `从运算符导入mul` `从症状导入因子` `从functools导入reduce` `def a007947（n）：如果n<2，则返回1，否则减少（mul，素数（n））` `定义a065642（n）：` `如果n==1：返回1` `r=a007947（n）` `n=n+r` `而a007947（n）=回复：` `n+=r` `返回n` `打印（[如果a065642（n）<n*min（素数（n）），则n在范围（10301）内的n为n]）#印地瑞尼Ghosh，2017年4月20日`
	交叉参考	`囊性纤维变性。A007947号,A020639号,A065642号,A285100型（补码），A285109型,A285337型.` `上下文中的序列：A241852型 A113756号 A055482号A362844飞机 A198470型 A245379型` `相邻序列：A284339号 284340英镑 A284341号284343英镑 A284344号 A284345号`
	关键字	`非n`
	作者	`乔纳塔·内里2017年3月25日`
	状态	`经核准的`

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

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

上次修改时间：2024年4月23日16:40 EDT。包含371916个序列。（在oeis4上运行。）