登录
奇数k,使得1^((k-1)/2)+2^((k-1)^((k-1)/2)==0(mod k)。
2

%我#40 2024年3月17日02:15:43

%S 1,3,5,7,11,13,15,17,19,23,27,29,31,35,37,39,41,43,47,51,53,55,59,61,

%电话63,67,71,73,75,77,79,83,85,87,89,91,95,97,99101103107111113,

%电话:115119123125127131135137139143147149151155157159

%N奇数k,使得1^((k-1)/2)+2^((k-1)^((k-1)/2)==0(mod k)。

%C渐近密度为0.379。。。

%H Amiram Eldar,n的表,a(n)表示n=1..10000</a>

%何塞·玛丽亚·格劳、弗洛里安·卢卡和安东尼奥·奥勒·马塞恩,<a href=“https://doi.org/10.1007/s10114-011-1148-7“>关于Giuga数字的变体,《数学学报》,英语丛书,第28卷第4期(2012年),第653-660页;<a href=”http://arxiv.org/abs/1103.3428“>预打印</a>,arXiv:1103.3428[math.NT],2011。

%tgi[n_]:=Mod[Sum[PowerMod[j,(n-1)/2,n],{j,n-1}],n];选择[Range[1300,2],gi[#]==0&]

%o(PARI)是(n)=我的(e=(n-1)/2);总和(k=1,n-1,Mod(k,n)^e)==0;

%o在旧版本上选择(is,vector(1000,i,2*i-1))\\,切换参数

%o 2011年3月19日查尔斯·格里特豪斯四世

%Y参考A007850。

%K nonn公司

%O 1,2号机组

%A _JoséMaríA Grau Ribas_,2011年3月16日