%I#6 2012年3月31日13:20:34
%S 1931459145571526172120879765410924527681234295990603883,
%电话:1657641497403730932175429661161435794911961211314635471219,
%电话281627617915591204869100695393177264670794893116129954908441654165941985419521583493682120033569705969681225583503508131129847013561362253744696258102531471954063583
%N最小奇素数基数q,使得p^6除以q^(p-1)-1,其中p=素数[N]。
%H W.Keller和J.Richstein<a href=“http://www1.uni-hamburg.de/RRZ/W.Keller/FermatQuotient.html“>可被p整除的费马商。
%o(PARI){a(n)=局部(p,x,y);如果(n==1,返回(193));p=prime(n);x=znprimroot(p^6)^(p^5);vecsort(向量(p-1,i,y=lift(x^i);while(!isprime(y),y+=p^6;y)))[1]}-Max Alekseyev_,2007年5月30日
%Y参考A125609、A125610、A125611、A125612、A125632、A125633、A125634、A125635、A125636、A125637、A125645、A125646、A125648、A125649。
%K非n
%O 1,1号机组
%A_Alexander Adamchuk,2006年11月29日
%E更多条款来自2007年5月30日的Max Alekseyev
|