%我#14 2020年8月30日03:25:14
%S 3,5,7,9,11,13,15,19,21,23,25,27,31,33,37,39,43,45,47,51,55,57,61,63,
%电话67,73,75,79,81,85,87,91,93,95103105111115117121123127133,
%U 135141145147151157163165171175177183187191193
%N单数:奇数k>1,使得k+1是素数乘以2的幂。
%H Amiram Eldar,n的表,n的a(n)=1..10000</a>
%H Kevin A.Broughan和周启智,<A href=“https://doi.org/10.1017/S0004972710000067“>平素数和薄素数,澳大利亚数学学会公报,第82卷,第2期(2010年),第282-292页,<a href=”网址:http://www.math.waikato.ac.nz/~kab/papers/flatandin4.pdf“>备选链接</a>。
%F a(n)~n对数n。
%t选择[Range[3200,2],(r=(#+1)/2^IntegerExponent[#+1,2])==1||PrimeQ[r]&](*_Amiram Eldar_,2020年8月30日*)
%o(PARI)是(n)=n%2&&(i素数((n+1)>>估值(n+1,2))||n+1==1<<估值(n+1,2))&&n>1
%Y参考A192869。
%K nonn公司
%O 1,1号机组
%A _Charles R Greathouse IV,2011年7月11日
|