%I#33 2023年11月19日21:16:56

%S 1,1,2,1,2,1,2,1,2,3,2,1,2,2,3,4,3,2,3,1,2,2,3,12,3,3,3，

%温度4,3,2,1,2,3,4,4,3,1,3,3,4,1,2,3,3,12,3,2,4,5,5,4,5,1,4,4，

%U 4,3,4,5,4,3,1,3,5,3,3,6,4,4,2,3,4,1,4,8,3,2,3,1,4,12,4,4,15,6,7,6,5

%N从2开始，3k-1素数超过3k+1素数。

%C累计金额A134323，取反。第一个负项是质数608981813029的a（23338590792）=-1。见格兰维尔和马丁的论文第4页_T.D.Noe_，2008年1月23日[由_宋嘉宁更正，2018年11月24日]

%C参见A321856中关于“切比雪夫偏见”的评论_2018年11月24日，宋嘉宁

%H T.D.Noe，n的表，n的a（n）=1..10000</a>

%H A.Granville和G.Martin，<A href=“http://www.jstor.org/stable/27641834“>素数竞赛</a>，《美国数学月刊》，113（2006年第1期），第1-33页。

%H维基百科，<a href=“https://en.wikipedia.org/wiki/Chebyshev%27s_bias“>切比雪夫的偏见</a>

%F a（n）=-Sum_{素数p<=n}勒让德（素数（i），3）=-Sam_{质数p<=n}克罗内克_2018年11月24日，宋嘉宁

%e a（1）=1，因为2==-1（mod 3）。

%e a（2）=1，因为3==0（mod 3），并且不改变计数。

%e a（3）=2，因为5==-1（mod 3）。

%e a（4）=1，因为7==1（mod 3）。

%t a[n]：=a[n]=a[n-1]+如果[Mod[Prime[n]，6]==1，-1，1]；a[1]＝a[2]＝1；表[a[n]，{n，1100}]（*_Jean-François Alcover_，2012年7月24日*）

%t累加[Which[IntegerQ[（#+1）/3]，1，IntegerQ[（#-1）/3]

%o（哈斯克尔）

%o a112632 n=a112632_列表！！（n-1）

%o a112632_list=scanl1（+）$map否定a134323_list

%o---Reinhard Zumkeller，2014年9月16日

%o（PARI）a（n）=-sum（i=1，n，kronecker（-3，素数（i）））\\_Jianing Song_，2018年11月24日

%Y参考A007352、A098044、A102283、A134323。

%设d为基本判别式。

%形式为“a（n）=-和{素数p<=n}Kronecker（d，p）”的Y序列，|d|<=12:A321860（d=-11），A320857（d=-8），A321859（d=-7），A066520（d=-4），A321856（d=-3），A331857（d=5），A071838（d=8），A323858（d=12）。

%形式为“a（n）=-Sum_{i=1..n}Kronecker（d，素数（i））”的Y序列，|d|<=12:A321865（d=-11），A320858（d=-8），A321864（d=-7），A038698（d=-4），该序列（d=-3），A321862（d=5），A3231861（d=8），A322863（d=12）。

%K符号，很好

%氧1,3

%2005年12月22日，A _Roger Hui