A364919-OEIS公司

A364919型

a（0）=1；a（n）是rad（m）除序列中尚未出现的最小数字mA019565号（n） ●●●●。

1、2、3、4、5、8、9、6、7、14、21、12、25、10、15、16、11、22、27、18、55、20、33、24、49、28、63、32、35、40、45、30、13、26、39、36、65、50、75、48、91、52、81、42、125、56、105、54、121、44、99、64、143、80、117、60、77、88、147、66、169、70、135、72、17、34 (列表;图表;参考;听;历史;文本;内部格式)

	抵消	`0.2个`
	评论	`设k是一个无平方数，并将R_k定义为数字m的集合，使得rad（m）\|k。` `对于n>0，a（n）是R_k中最小的m，因此a（j）！=m、 j<编号。` `猜想：自然数的排列。`
	链接	`迈克尔·德弗利格，n=0..16384时的n，a（n）表` `迈克尔·德弗利格，a（n）的对数对数散点图，n=0..2^14，用红色表示素数，用金色表示复合素数幂，用绿色表示无平方复合数，数字既不是无平方的也不是蓝色的素数幂。我们强调数字A001694号这些国家不是拥有巨大淡蓝色点数的大国。` `迈克尔·德弗利格，在（x，y）=（n，k）处绘制p（k）^e（k），n=0..2^11，颜色函数表示e（k）=1（黑色），e（k。底部的条形图指示与上面的散点图类似的颜色代码中的（n）。` `迈克尔·德弗利格，扇形二叉树，显示a（n），n=0..2^12-1，颜色代码类似于上面的散点图。`
	配方奶粉	`a（2^k）=素数（k+1）。`
	例子	`设b（n）=A019565号（n） ●●●●。` `a（1）=2，因为b（1）=2。因为2是素数，所以我们在2的素数幂范围内找到了第一个不在序列中的数字，即2。` `a（3）=4，因为b（3）=6，并且使得尚未出现的rad（m）\|6的最小数字m是4。` `a（5）=8，因为b（5）=10。R_10以{1、2、4、5、8、10、16…}开头，该列表中尚未出现在序列中的最小数字m是8。` `a（6）=9，因为b（6）=15。R_15以{1，3，5，9，15，25，…}开头，该列表中尚未出现在序列中的最小m是9，以此类推。`
	数学	`nn=120；rad[x_]：=rad[x]=倍@FactorInteger[x][[All，1]]；` `f[x_]：=倍@@Prime@位置[Reverse@IntegerDigit[x，2]，1][[All，1]；` `c[_]：=错误；c[1]=正确；q[_]：=1；a[0]=1；r[_]：=1；` `执行[If[PrimeQ[#]，` `而[c[集[k，#^q[#]]]，q[#]++]，` `而[Or[c[r[#]]！可除[#，rad[r[#]]]，r[#]++]；k=r[#]]&[f[i]]；集合[{a[i]，c[k]}，{k，True}]，{i，nn}]；` `数组[a，nn+1，0]`
	交叉参考	`囊性纤维变性。A005117号,A007947号,A019565号,A289280型.` `上下文中的序列：A171979号 A361858飞机 A181694号A297166型 1971年2月 A319024型` `相邻序列：A364916型 A364917型 A364918型A364920型 A364921型 A364922型`
	关键词	`非n`
	作者	`迈克尔·德弗利格2023年8月30日`
	状态	`经核准的`