A094998-OEIS公司

A094998号

a（n）是第n个素数的最小正整数倍数，例如k*素数（n），使得对于每个具有1<j<素数（n）的整数j，k*素值（n）==1（mod j）。

2, 3, 25, 301, 25201, 83161, 7207201, 49008961, 698377681, 2248776129601, 39594522567601, 2599263952084801, 160287943711896001, 4381203794791824001, 386203114510899285601, 130159869178331861668801

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

抵消

1,1

链接

迪米特里·帕帕佐普洛斯，n=1..167时的n，a（n）表

配方奶粉

a（n）=A099795号（n）*A099796号（n） +1个=A099794号（n） *素数（n）。

log（a（n））=素数（n）（近似，经验观察）-迪米特里·帕帕佐普洛斯2018年12月27日

例子

对于n=1，没有这样的j，所以这个条件是真空满足的，我们可以取k=1，得到a（1）=2-N.J.A.斯隆2015年2月10日

数学

a[1]=2；a[2]=3；a[n_]：=模[{p，m，r，r0，r1}，p=素数[n]；m=LCM@@范围[2，p-1]；r=减少[k>0&&p*k+m*j==1，{k，j}，整数]；r0=r/。C[_]->0；r1=r/。C[_]->1；如果[r0===False，r1[[1,2]，Min[r0[[1,2]]，r1[1,2]]]*p]；表[a[n]，{n，1，20}](*Jean-François Alcover公司2015年2月9日*）

黄体脂酮素

（岩浆）/*根据定义（缓慢）：*/

S： =[]；对于[1..9]中的n，做k:=1；虽然不是[2..NthPrime（n）-1]|IsOne（k*NthPrice（n）mod j）}中的所有{j:j都执行k:=k+1；结束while；附加（~S，k*NthPrime（n））；结束；S、 /*或*/

[p eq 2 select p else Modinv（p，Lcm（[1..p-1]））*p:p in PrimesUpTo（60）]//布鲁诺·贝塞利2015年2月8日

（PARI）a（n）=｛p=素数（n）；k=1；对于（n=2，p-1，k=lcm（k，n））；对于（j=1，p，if（（j*k+1）/p==ceil（（j*k+1）/p），t=j*k+1；break（）））；return（t）；｝\\迪米特里·帕帕佐普洛斯2018年12月28日

交叉参考

囊性纤维变性。A099794号,A099795号,A099796号.

上下文中的序列：A281169号 A296281型 A226018个*A208203型 A109586号 A127231号

相邻序列：A094995号 A094996号 A094997号*A094999号 A095000型 A095001型

关键字

非n

作者

Mark Troll（mtroll（AT）u.washington.edu），2004年10月22日

扩展

编辑和扩展人雷·钱德勒2004年10月29日

在定义中添加了“积极”-N.J.A.斯隆2015年2月10日

状态

经核准的