%I#29 2020年6月9日03:31:42
%S 7001040115018482590266067106862700077167852806085289275,
%电话:987510103106401183012010126881334016520173501757017960,
%电话:1813018340192031927219420198201999782401204422048020612207202301623463
%N数k,使得基k的最小伪素数A090086(k)(不一定超过k)是一个Carmichael数。
%C相应的Carmichael数是561、561、1561、1105、561和561、1729、561,561、1105,561、56、561。。。
%C Andrzej Schinzel证明了这个序列是无限的。推测:如果A090086(n)是Carmichael数k,则k<n.-托马斯·奥多夫斯基,2018年8月8日
%H Amiram Eldar,<a href=“/A2393203/b293203.txt”>n,a(n)表,n=1.-10000</a>
%H Andrzej Rotkiewicz,<a href=“http://matwbn.icm.edu.pl/ksiazki/aa/aa91/aa9114.pdf“>与Carmichael数和函数l_x^C的最小周期相关的伪素数的周期序列,《算术学报》,第91卷,第1期(1999年),第75-83页。
%H Andrzej Rotkiewicz,<a href=“https://doi.org/10.1007/978-94-011-4271-7_28“>关于伪素数及其推广的已解决和未解决问题</a>,斐波那契数的应用,施普林格荷兰,1999年,第293-306页。
%e 700是序列,因为A090086(700)=561是Carmichael数。
%t carmichaelQ[n_]:=可除[n-1,CarmichaelLambda[n]]&&!PrimeQ[n];
%tf[n_]:=块[{k=1},而[GCD[n,k]>1||PrimeQ[k]||PowerMod[n,k-1,k]!=1,j=k++];k] ;选择[Range[10000],carmichaelQ[f[#]]&](*在Robert G.Wilson v之后,A090086*)
%Y参考A002997、A090086。
%K nonn公司
%O 1,1号机组
%A _Amiram Eldar,2017年10月12日
|