%I#35 2022年2月22日00:08:05

%S 1,1,0,0,00,0,1,1,0,0，0,1,1,1,1,0,0、1,1,1,1,0,1,0,1,1,1,1,1，

%T 1,1,1,0,1,1,0,0,0，1,1,1,1,0，1,1，1,1,1，1,1,0,1,1,1,1,1,0,0,11,1,0，

%U 1,1,1,0,0,1,1,1,0,1,1,1,0,1,1,0,1,1,1,1,1,0,1,1,1,1,1,1,0,1,1,1,0,0,1,1,1,0,0,1,1,0,0,1,1,0,0,1,1,0,1,1,1,1,0,1,1,1,1,1,1,1,1,1,1,1,1,1

%N非孤立非素数的特征函数。

%C非孤立非素数，即两个相邻整数中至少有一个也是非素数。

%H Antti Karttunen，n的表，n=0..65539的a（n）</a>

%特征函数的索引项</a>

%对于n>2，F a（0）=1，a（1）=1，a（2）=0，a（n）=1-A010051（n-（n+1）mod 2））*A010051。

%F a（n）=1-（pi（n）-pi（n-2））*（pi_Ridouane Oudra，2022年1月10日

%ta[0]=1；a[1]=1；a[2]=0；a[n]：=1-（PrimePi[n-Mod[n+1，2]]-PrimePi[n-Mod[1,2]-1]）（PrimePi[n+Mod[n+1,2]-PrimePi[n+Mod[1,2]-1]）；表[a[n]，{n，0，100}]

%o（PARI）A292438（n）=如果（n<2,1，！isprime（n）&&（（！isprim（n-1））||（！isprime（n+1）））；\\_Antti Karttune_，2018年7月2日

%Y参见A000720、A010051、A014574、A141468、A164276。

%K nonn公司

%0、1

%A_Wesley Ivan Hurt_，2018年3月31日

%E更多条款来自_Antti Karttunen_，2018年7月2日