%I#2 2012年3月30日17:30:37
%S 1,6102131230公司
%N以十进制表示的Pi的前N个以5为基数的数字构成素数。
%e Pi(A004604)的前6个五位数是小数303232=9817,这是一个质数。
%t Do[If[PrimeQ[FromDigits[First[RealDigits[Pi,5,n]],5]],打印[n]]
%Y参考A004604。
%K基,nonn
%O 1,2号机组
%A _Robert G.Wilson v_,2001年12月10日