登录
OEIS由OEIS基金会的许多慷慨捐赠者.

 

标志
提示
(来自的问候整数序列在线百科全书!)
A350781型 素数p的逆q是半素数,p+q及其逆的一个是素数,另一个是半素数。 1
419, 599, 647, 12497, 13487, 14461, 15467, 15991, 16981, 17431, 17551, 18097, 18521, 18541, 19087, 19427, 20921, 20929, 22039, 22349, 22501, 22567, 22621, 22669, 22859, 24091, 24329, 24799, 26099, 26209, 26297, 26309, 26399, 26501, 26557, 26699, 26711, 26849, 28019, 28051, 28537, 28597, 28669 (列表;图表;参考文献;;历史;文本;内部格式)
抵消
1,1
链接
罗伯特·伊斯雷尔,n=1..10000时的n,a(n)表
例子
a(3)=647是一个术语,因为647是质数,其反面746=2*373是半质数,647+746=1393=7*199是半质素,1393的反面3931是质数。
MAPLE公司
过滤器:=proc(p)局部q,r,s;
如果不是isprime(p),则返回false fi;
q: =数字(p);
如果numtheory:-bigomega(q)<>2,则返回false fi;
r: =p+q;
s: =数字(r);
{numtheory:-bigomega(r),numtheori:-bigomega(s)}={1,2}
结束过程:
digrev:=程序(n)局部L,i;
五十: =换算(n,基数,10);
加(L[-i]*10^(i-1),i=1..nops(L))
结束过程:
选择(过滤器,[seq(i,i=3..10^5,2)]);
数学
半Q[n_]:=原欧米茄[n]==2;q1[p_]:=PrimeQ[p]&&semiQ[IntegerReverse[p]];q2[p_]:=semiQ[p]&&PrimeQ[IntegerReverse[p]];q[p]:=q1[p]&&(q1[(s=p+IntegerReverse[p])]||q2[s]);选择[Range[30000],q](*阿米拉姆·埃尔达尔2022年1月16日*)
黄体脂酮素
(Python)
来自sympy import isprime,factor
def issemip(n):返回和(factorint(n).values())==2
定义正常(p):
如果不是isprime(p):返回False
q=int(字符串(p)[::-1])
如果不是issemip(q):返回False
r=整数(str(p+q)[::-1])
返回(isprime(p+q)和issemip(r))或(isprim(r)和issseip(p+q))
打印([k代表范围(30000)中的k,如果正常(k)])#迈克尔·布拉尼基2022年1月15日
交叉参考
参见。A001358号.
的后续A085778号.
关键词
非n,基础
作者
状态
已批准

查找|欢迎光临|维基|寄存器|音乐|地块2|演示|索引|浏览|更多|网络摄像头
贡献新序列。或评论|格式|样式表|变换|超级搜索引擎|最近
OEIS社区|维护人OEIS基金会。

许可协议、使用条款、隐私政策。.

上次修改时间:2024年4月27日23:22 EDT。包含372020个序列。(在oeis4上运行。)