%我
%第4,6,14,38,62,741581942783143984224585424662674734758节,
%电话:878998109411541202121412381322138214541622165817541874,
%U 193419942018213824224742558259427982852918306232183254
%形式为素数+1的N个半素数。
%C a(n)=A005383(n)+1=2*A005382(n)。
%在100000以下有672个素数+1形式的半素数。
%C a(n)=A232342(n)+A077065(n)。-_Reinhard Zumkeller,2013年12月16日
%H Reinhard Zumkeller,<a href=“/A077068/b077068.txt”>n,a(n)表,n=1..10000</a>
%F A010051(A008864(n)/2)=A064911(A008864(n))=1。-_Reinhard Zumkeller,2013年11月22日
%e A001358(25)=74=2*37是一个74=A000040(21)+1=73+1的术语。
%t Select[范围[6000],加上@@Last/@FactorInteger[#]==2&&PrimeQ[#-1]&](*\u Vladimir Joseph Stephan Orlovsky,2011年5月8日*)
%t Select[Prime@Range@460+1,PrimeOmega@==2&](*\u Robert G.Wilson v,2014年2月18日*)
%o(哈斯凯尔)
%o a077068 n=a077068\u列表!!(n-1)
%o a07068_list=过滤器((==1)。a010051。(`div`2))a008864\U列表
%o--Reinhard Zumkeller,2013年11月22日
%o(PARI)[x+1 | x<-primes(10^5),bigomega(x+1)==2]\\\\\u Charles R Greathouse四世,2013年11月22日
%o(PARI)is(n)=i质(n-1)和&i质(n\2)\\\\\ Charles R Greathouse IV,2016年3月20日
%Y比照A008864、A001358、A000040、A077065、A077067。
%不知道
%O 1,1号
%A_Reinhard Zumkeller,2002年10月23日
|