A347681-OEIS公司

A347681型

按行读取的三角形：T（n，k）（1<=k<=n）=f（质数（n），质数（k）），其中f（x，y）=x*red_inv（x，y）+y*red_in v（y，x），如果gcd（x，y=1），则为0，如果gcd>1，则为零，并且在注释中定义了red_inv。

0, 5, 0, 9, 11, 0, 13, 13, 29, 0, 21, 23, 21, 43, 0, 25, 25, 51, 27, 131, 0, 33, 35, 69, 69, 67, 103, 0, 37, 37, 39, 113, 153, 77, 305, 0, 45, 47, 91, 139, 45, 183, 137, 229, 0, 57, 59, 59, 57, 175, 233, 407, 115, 231, 0, 61, 61, 61, 125, 309, 311, 373, 495, 185, 869, 0, 73, 73, 149, 223, 221, 443, 443, 75, 369, 813, 371, 0

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

抵消

1,2

如果u，v是gcd（u，v）=1的正整数，如果u^（-1）mod v<=v/2，则u mod v的“约化逆”red_inv（u，v）为u^。

也就是说，我们将u映射到+-u中具有0到v/2范围内代表性modv的任何一个。换句话说，red_inv（u，v）是0到v/2范围内的数字r，因此r*u==+-1 mod v。

例如，red_inv（3,11）=4，因为3^（-1）mod 11=4。但red_inv（2,11）=5=11-6，因为red_inv=2,11）=6。

研究中出现的A344005型.

链接

N.J.A.斯隆，n=1..5050时的n，a（n）表[前100行，扁平]

例子

三角形开始：

5, 0,

9, 11, 0,

13, 13, 29, 0,

21, 23, 21, 43, 0,

25, 25, 51, 27, 131, 0,

33, 35, 69, 69, 67, 103, 0,

37, 37, 39, 113, 153, 77, 305, 0,

45, 47, 91, 139, 45, 183, 137, 229, 0,

57, 59, 59, 57, 175, 233, 407, 115, 231, 0,

...

MAPLE公司

myfun1:=proc（A，B）局部Ar，Br；

如果igcd（A，B）>1，则返回（0）；fi；

Ar:=（A）^（-1）B型；

如果2*Ar>B，则Ar:=B-Ar；fi；

Br:=（B）^（-1）A型；

如果2*Br>A，则Br:=A-Br；fi；

A*Ar+B*Br；

结束；

myfun2:=（i，j）->myfun1（ithprime（i），ithprice（j））；

对于1到20的i，执行lprint（[seq（myfun2（i，j），j=1..i）]）；日期：

交叉参考

囊性纤维变性。A344005型,A347682型,A347683型,A347684型.

上下文中的序列：A176325号 A275792型 A010481号*A374285型 A291724型 A340950型

相邻序列：A347678型 A347679型 A347680型*A347682型 A347683型 A347684

关键词

非n,表

作者

N.J.A.斯隆2021年9月18日

状态

经核准的