A364246-OEIS公司

A364246型

a（1）=1。此后，如果rad（a（n-1）），a（n）是任一素数（k+1）的最小新倍数=A002110号（k），或Product_{prime q；q<gpf（a（n-1））；否则为q！|a（n-1）}q。

1, 2, 3, 4, 6, 5, 12, 10, 9, 8, 15, 14, 30, 7, 60, 21, 20, 18, 25, 24, 35, 36, 40, 27, 16, 33, 70, 39, 770, 42, 45, 22, 105, 26, 1155, 28, 75, 32, 48, 50, 51, 10010, 54, 55, 84, 65, 462, 80, 57, 170170, 63, 90, 49, 120, 56, 135, 34, 15015, 38, 255255, 44, 210 (列表;图表;参考;听;历史;文本;内部格式)

	抵消	`1,2`
	评论	`换句话说，如果a（n-1）的无平方核是一个初等项，那么a（n）是不除a（n-1）的最小素数的最小新倍数。否则，a（n）是所有素数<gpd（a（n-1））的乘积的最小新倍数，这些素数不除以a（n-1）。当a（k-1）为A002110号（m-1）。对于某些乘数m，素数周围的模式是P（k）、素数（k+1）、2P（k=A002110号（k） ●●●●。序列被推测为正整数的置换，素数按自然顺序排列。` `这个序列中的一个常见模式是无平方半素数q（j）q（k），j<k，然后是P（k-1）/q（j。交替经常发生在每次迭代增加k的情况下。例如：a（241..246）：q（2）*q（17）->P（16）/q（2。a（16539..16572）代表17次交替-迈克尔·德弗利格2023年7月17日`
	链接	`迈克尔·德弗利格，n=1..10000时的n，a（n）表` `迈克尔·德弗利格，Log_10（a（n））的对数散点图，n=1..2^16，用红色突出显示质数a（n）。`
	例子	`a（5）=6是一个素数，所以下一项是不除以6的最小素数，因此a（7）=5。` `a（26）=33×11，不除以11的素数<11的乘积是2×5×7＝70，这是以前没有发生过的，因此a（27）=70。`
	数学	`nn=120；c[_]：=错误；m[_]：=1；a[1]=j=1；c[1]=正确；` `f[x_]：=如果[#==素数@Range[PrimePi@#[-1]]]，素数[PrimePi@#[-1-]+1]，` `时间@@Complement[Prime@Range[PrimePi@#[-1]]-1]，#]]&[` `FactorInteger[x][[All，1]]]；` `执行[While[Set[k，f[j]]；c[k米[k]]，m[k]++]；k=米[k]；` `集合[{a[n]，c[k]，j}，{k，真，k}]，{n，2，nn}]；` `数组[a，nn](迈克尔·德弗利格，2023年7月17日*）`
	交叉参考	`囊性纤维变性。A002110号,A006530号,A007947号,362889英镑,A364154型.` `上下文中的序列：A119755号 A206710型 A175502号A372699型 A368133型 A362855型` `相邻序列：A364243型 A364244型 A364245美元A364247飞机 A364248型 A364249型`
	关键词	`非n`
	作者	`大卫·詹姆斯·西卡莫尔，2023年7月15日`
	扩展	`更多术语来自迈克尔·德弗利格2023年7月17日`
	状态	`经核准的`