%I#16 2018年11月1日12:24:51
%序号2,2,3,4,6,045736248891083623418682
%N以斐波那契(N)作为最小本原根的最小数,如果不存在这样的数,则为0。
%F a(n)=A214158(A000045(n))_2018年10月31日,宋建宁
%e a(8)=362,因为362是Fibonacci(8)=21作为最小本原根的第一个数字。
%t<<数字理论`NumberTheoryFunctions`;a=表格[Fibonacci[i],{i,2,20}];b=表[0,{20}];k=1;Do[j=FromDigits[Flatten[Position[a,PrimitiveRoot[n]]];如果[b[[j]]==0,b[[j]]=n],{n,2,10^6}];b
%Y参考A083701,A214158。
%K nonn,更多
%O 1,1号机组
%A _Sven Simon,2003年5月4日
%E 2018年10月30日从米歇尔·马库斯偏移1
%E a(4)由_Jianing Song修正,2018年10月31日
|