%I#11 2014年11月27日15:29:58

%S 1,1,1,1,1,1,1,2,1,1,1,1,1,1,1,1,2,1,1,1,2,1,1,11,1,1,1，1,1,1,2，

%T 1,1,1,3,1,2,3,1,1,2,1,1,1,1,2,1,1,1,1,1,1,1,2,1,1,1,1,1,1,1，

%U形图3,1,1,1,3,1,1,2,1,2,1,2,2,1,1,1,1,1,1,1,1,11,1,1,2,1,1,1

%N第N个不规则素数A000928（N）的不规则指数。

%C定义见A091888。

%H T.D.Noe，n表，n=1..100000的a（n）（来自Buhler等人）

%H J.Buhler、R.Crandall、R.Ernvall、T.Metsankyla和M.A.Shokrollahi，<A href=“http://dx.doi.org/10.1006/jsco.1999.1011“>不规则素数和分圆不变量到1200万</a>，《符号计算杂志》31，2001，89-96。

%t tp=表[p=素数[i]；cnt=0；k=1；当[2k<=p-3时，如果[Mod[Numerator[BernoulliB[2k]]，p]==0，cnt++]；k++]；cnt，{i，400}]；选择[tp，#>0&]

%Y参见A073277（素数具有不规则指数2）、A060975（素数有不规则指数3）、A061576（最小素数具有规则指数n）、A091888（素数（n）的不规则指数）。

%K nonn公司

%O 1,8型

%A._T.D.Noe_，2004年2月9日