%I#9 2013年11月21日12:50:05
%S 26,38,51,62,86111123134158185206267278303305411446,
%电话:4715115665916356876997347557857918038318789959981047,
%电话:1055119114511991214123812411286
%形式为m*k的N个半素数,使得(m-1)/(k+1)也是半素数。
%H Vincenzo Librandi,n的表,n=1..1000的a(n)</a>
%e a(1)=26,因为半素数=26=13*2和(13-1)/(2+1)=4=半素数。
%t spQ[n_]:=模块[{fs=Transpose[FactorInteger[n]][[1]]},PrimeOmega[(Last[fs]-1)/(First[fs]+1)]==2];选择[Select[Range[1300],PrimeOmega[#]==2&],spQ](*哈维·P·戴尔,2011年7月27日*)
%Y参考A178564。
%K nonn公司
%O 1,1号机组
%A _Juri-Stepan Gerasimov,2010年6月1日
%E更多条款摘自R.J.Mathar_,2010年6月26日