%I#13 2018年6月16日18:30:26

%S 1,2,3,4,5,6,7,8,9,10,5,11,12,13,14,15,16,17,18,19,20,21,22,23,24，

%电话：25,26,5,27,28,29,30,31,32,33,34,35,36,37,58,39,40,41,42,43,44,45，

%U 46,47,48,5,49,50,51,52,53,54,55,56,57,58,59,60,61,62,63,64,65,66,67,68,69,70,71,72,73,74,75,76,77,5,78,79,80,81,82,58,83,84,85,86,87,88,89,90,91,92,93,94,95,96,97,98,99100101102103104,5

%N（Sophie-Germain素数>3）的过滤序列=常数序列。

%C所有此类序列S的Filer序列，其中S（A005384（k））=所有k的常数>=3。

%C有序对的限制生长序列变换[A305900（n），A305901（1+n）]。

%C对于所有i、j：

%C a（i）=a（j）=>A305900（i）=A305900，

%C a（i）=a（j）=>A305901（1+i）=A305900（1+j），

%C a（i）=a（j）=>A305978（i）=A30597八（j），

%C a（i）=a（j）=>A305985（i）=A305985。

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

%F如果n<5，a（n）=n；对于n>=5，如果A156660（n）==1，则a（n）=5[当n位于A005384[3.]=5，11，23，29，41，53，83，89，113，…]，否则a（n）=3+n-A156874（n）。

%o（PARI）

%o up_to=100000；

%o A156660（n）=（i素数（n）和i素数来自A156660

%o部分数（f，up_to）={my（v=向量（up_to，s=0）；对于（i=1，up_to，s+=f（i）；v[i]=s）；（v）；}

%o v156874=部分（A156660，up_to）；

%o A156874（n）=v156874【n】；

%o A305810（n）=如果（n<5，n，如果（A156660（n），5,3+n-A156874（n））；

%Y参见A005384、A156660、A156874、A305900、A305901、A305978、A305985。

%K nonn公司

%O 1,2号机组

%A _Antti Karttunen，2018年6月16日