A360719-OEIS公司

A360719型

a（n）是最大的k<A126706号（n）使得rad（k）=rad(A126706号（n）），其中rad（n）=A007947号（n） ●●●●。

6, 12, 10, 18, 14, 24, 20, 22, 15, 36, 40, 26, 48, 28, 30, 21, 34, 54, 45, 38, 50, 42, 44, 60, 46, 72, 56, 33, 80, 52, 96, 98, 58, 39, 90, 62, 84, 66, 75, 68, 70, 108, 63, 74, 120, 76, 51, 78, 100, 144, 82, 126, 57, 86, 35, 88, 150, 92, 94, 147, 162, 112, 132, 160, 102, 69, 104, 106, 192, 110, 196, 135

(列表;图表;参考;听;历史;文本;内部格式)

抵消

1,1

排列A024619号.

让我来=A126706号（n）设R_m是数字k的序列，使得rad（k）=rad（m）。a（n）给出了R_m中m的前身。

链接

迈克尔·德弗利格，n=1..10000时的n，a（n）表

迈克尔·德弗利格，a（n）的对数散点图，n=1..2^16。

迈克尔·德弗利格，a（n）的对数散点图，n=1..2^12，以绿色显示无平方数字，并突出显示中的数字kA286708型带有大的淡蓝色圆点。

例子

A126706号(1) = 12;使rad（k）=rad（12）=6的最小k<12是a（1）=6。

A126706号(2) = 18;使rad（k）=rad（18）=6的最小k<18是a（2）=12。

A126706号(3) = 20;使rad（k）=rad（20）=10的最小k<20是a（3）=10。

数学

rad[x_]：=倍数@系数整数[x][[All，1]]；表[Function[r，SelectFirst[Range[m-1，1，-1]，rad[#]==r&]][rad[m]]，{m，Select[Range[225]，Nor[SquareFreeQ[#]，PrimePowerQ[#]]&]}]

交叉参考

囊性纤维变性。A007947号,A126706号,A360529型.

上下文中的序列：A164378号 A124349号 A386945飞机*A365787飞机 A315566型 A236926型

相邻序列：A360716型 A360717型 A360718型*A360720型 A360721型 A360722型

关键词

非n

作者

迈克尔·德弗利格2023年5月1日

状态

经核准的