登录
OEIS由OEIS基金会的许多慷慨捐助者.

 

标志
提示
(来自的问候整数序列在线百科全书!)
A197637号 非Wilson素数<=n。 2
0, 1, 2, 2, 2, 2, 3, 3, 3, 3, 4, 4, 4, 4, 4, 4, 5, 5, 6, 6, 6, 6, 7, 7, 7, 7, 7, 7, 8, 8, 9, 9, 9, 9, 9, 9, 10, 10, 10, 10, 11, 11, 12, 12, 12, 12, 13, 13, 13, 13, 13, 13, 14, 14, 14, 14, 14, 14, 15, 15, 16, 16, 16, 16, 16, 16, 17, 17, 17, 17, 18, 18, 19, 19, 19, 19, 19, 19, 20, 20, 20, 20, 21, 21, 21, 21, 21, 21, 22, 22, 22, 22, 22, 22, 22, 22, 23, 23, 23, 23 (列表图表参考历史文本内部格式)
抵消
1,3
评论
非威尔逊素数的π(n)的类似物。
的反函数A197636号,作为A197636号(a(n))=n当且仅当n是非Wilson素数,即A197636号.
经验证据表明序列是无限的,即A197636号是无限的,尽管似乎没有证据-费利克斯·弗罗利奇(Felix Fröhlich)2016年5月18日
链接
费利克斯·弗罗里奇,n=1..10000时的n,a(n)表
E.Costa、R.Gerbicz和D.Harvey,寻找Wilson素数《计算数学》,83(2014),3071-3091(arXiv:1209.3436[math.NT],2012年)。
配方奶粉
一个(A197636号(n) )=n
例子
有3个非Wilson素数<=8,即2、3和7,因此a(8)=3。
数学
nmax=100;nonWilsonQ[p_]:=模式[(p-1)!+1)/p,p]!=0; nonWilsonPrimes=选择[Prime[Range[nmax+2]],nonWilson Q];a[n_]:=计数[nonWilsonPrimes,k_/;k<=n];表[a[n],{n,1,nmax}](*Jean-François Alcover公司2012年10月10日*)
黄体脂酮素
(PARI)我的(i=0);对于(n=1,50,如果(ispseudoprime(n)&&Mod((n-1)!,n^2)=-1,i++);打印1(i,“,”)/*费利克斯·弗罗利奇(Felix Fröhlich)2016年5月18日*/
(PARI)/*以下程序在n=2*10^13之前有效(参见Costa,Gerbicz,Harvey,2014)*/
我的(w=[5,13563],i=0);对于(n=1200,对于(k=1,#w,如果(n==w[k],i++));打印1(素数(n)-i,“,”)/*费利克斯·弗罗利奇(Felix Fröhlich)2016年5月18日*/
交叉参考
囊性纤维变性。A000720美元,A197636号.
关键词
非n
作者
乔纳森·桑多,2011年10月19日
状态
经核准的

查找|欢迎光临|维基|注册|音乐|地块2|演示|索引|浏览|更多|网络摄像头
贡献新序列。或评论|格式|样式表|变换|超级搜索|最近
OEIS社区|维护人OEIS基金会。

许可协议、使用条款、隐私政策。.

上次修改时间:美国东部夏令时2024年4月19日21:09。包含371798个序列。(在oeis4上运行。)