A359929-OEIS公司

A359929型

行读取的不规则三角形，其中第n行列出k<t，使得rad（k）=rad（t），但k不除以t，其中t=A360768型（n）和rad（k）=A007947号（k）。

12, 18, 24, 18, 36, 20, 40, 12, 24, 36, 48, 48, 54, 45, 50, 60, 18, 36, 54, 72, 28, 56, 40, 80, 24, 48, 72, 96, 98, 90, 84, 75, 54, 96, 108, 63, 60, 90, 120, 50, 100, 12, 24, 36, 48, 72, 96, 108, 144, 126, 120, 150, 147, 18, 36, 54, 72, 108, 144, 162, 56, 112, 132, 80, 160, 48, 96, 144, 162, 192, 98, 196

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

抵消

1,1

链接

迈克尔·德弗利格，n=1时的n，a（n）表。.14675（行n=1..3000，扁平）

迈克尔·德弗利格，在（x，-y）处绘制（k，t），其中k=A126706号（i）和t=A360768型（j）对于i=1..48和j=1..108，k显示为深蓝色，t显示为深红色，对于t和非除数k，使得rad（k）=rad（t），我们用大黑点高亮显示。此序列计算第n行中黑点的数量。

配方奶粉

行长度以A359382型.

例子

序列的一些第一行的表，显示偶数和奇数b（n）=A360768型（n）行中包含单个和多个术语：

n该序列的b（n）行n

---------------------------------

1 18 12;

2 24 18;

3 36 24;

4 48 18, 36;

5 50 20, 40;

6 54 12, 24, 36, 48;

...

8 75 45;

...

18 135 75;

...

23 162 12, 24, 36, 48, 72, 96, 108, 144;

...

56 375 45, 135, 225;

57 378 84, 168, 252, 294, 336;

58 384 18, 36, 54, 72, 108, 144, 162, 216, 288, 324

数学

rad[x_]：=rad[x]=倍@FactorInteger[x][[All，1]]；

s=选择[Range[2^7]，Nor[SquareFreeQ[#]，PrimePowerQ[#]]&]；

t=选择[s，#1/#2>=#3&@@{#1，Times@@#2，#2[2]]}&@@

{#，FactorInteger[#][[All，1]]}&]；

扁平@Map[函数[{n，k}，

选择[TakeWhile[s，#<n&]，

[rad[#]=k！可除数[n，#]]&]]@{#，rad[#]}&，t]

交叉参考

囊性纤维变性。A007947号,A126706号,A355432飞机,A359382型,A360768型.

上下文中的序列：A031207号 A107794号 A280014型*A162151号 A056773号 A297925型

相邻序列：A359926飞机 A359927飞机 A359928型*599930英镑 A359931型 A359932型

关键词

非n,标签

作者

迈克尔·德弗利格2023年3月29日

状态

经核准的