年度呼吁:请向OEIS基金会捐款支持OEIS的持续开发和维护。现在是我们的第61年,我们有超过378000个序列,我们已经获得了11000条引文(通常说“多亏了OEIS才发现”)。
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日*)
OEIS服务器: https://oeis.org/edit/global/2062
提出
经核准的
编辑
文森佐·利班迪(Vincenzo Librandi),<a href=“/A178662号/b178662.txt“>n表,n=1..1000时为a(n)</a>
_尤里·斯蒂潘·杰拉西莫夫 (2步板(自动变速箱)漫步者.俄罗斯), _, 2010年6月1日
OEIS服务器: https://oeis.org/edit/global/257
更多术语来自_R.J.马塔尔 (马塔尔(自动变速箱)街道.莱德努尼夫.国家实验室), _, 2010年6月26日
OEIS服务器: https://oeis.org/edit/global/190
spQ[n_]:=模块[{fs=Transpose[FactorInteger[n]][[1]]},PrimeOmega[(Last[fs]-1)/(First[fs]+1)]==2];选择[Select[Range[1300],PrimeOmega[#]==2&],spQ](*摘自Harvey P.Dale,2011年7月27日*)
形式为m*k的半素数,使得(m-1)/(k+1)也是半素数。
26, 38, 51, 62, 86, 111, 123, 134, 158, 183, 185, 206, 267, 278, 303, 305, 411, 446, 471, 511, 566, 591, 635, 687, 699, 734, 755, 785, 791, 803, 831, 878, 995, 998, 1047, 1055, 1119, 1145, 1199, 1214, 1238, 1241, 1286
1,1
a(1)=26,因为半素数=26=13*2和(13-1)/(2+1)=4=半素数。
囊性纤维变性。A178564号.
非n,新的
Juri Stepan Gerasimov(2步(AT)漫步者.ru),2010年6月1日
R.J.Mathar(Mathar(AT)strw.leidenuniv.nl)提供的更多术语,2010年6月26日