显示找到的2个结果中的1-2个。
第页1
2, 29, 41, 233, 239, 251, 257, 269, 293, 311, 359, 383, 401, 419, 449, 467, 491, 2269, 2309, 2339, 2377, 2381, 2393, 2411, 2417, 2447, 2473, 2503, 2543, 2579, 2591, 2621, 2633, 2671, 2687, 2699, 2713, 2753, 2789, 2797, 2819, 2843, 2879, 2939, 3011, 3041, 3067, 3083, 3119, 3137, 3167, 3191, 3203
MAPLE公司
N: =5000:#对于术语<=N
dcat:=proc(L)局部i,x;
x: =L[-1];
对于i从nops(L)-1到1 by-1 do
x: =10^(1+ilog10(x))*L[i]+x
od;
x个
结束进程:
F: =排序(ifactors(n)[2],(a,b)->a[1]<b[1]);
dcat(映射(t->t[1]$t[2],F));
结束进程:
R: =空:
对于从1到n/2的n do
如果v<N和isprime(v),则R:=R,vfi;
日期:
排序(转换({R},列表));
1, 6, 14, 18, 22, 26, 34, 36, 38, 46, 48, 62, 66, 74, 106, 108, 110, 122, 134, 146, 156, 166, 170, 174, 178, 194, 196, 198, 206, 226, 230, 254, 262, 274, 278, 290, 294, 298, 306, 318, 354, 362, 374, 386, 392, 394, 416, 420, 422, 426, 458, 466, 468, 490, 502, 504, 516, 526, 528, 530, 532, 544, 562
例子
a(3)=14是一个术语,因为14+A037276号(14) =14+27=41是质数。
MAPLE公司
dcat:=proc(L)局部i,x;
x: =L[-1];
对于i从nops(L)-1到1 by-1 do
x: =10^(1+ilog10(x))*L[i]+x
od;
x个
结束进程:
F: =排序(ifactors(n)[2],(a,b)->a[1]<b[1]);
dcat(映射(t->t[1]$t[2],F));
结束进程:
选择(t->isprime(t+A037276号(t) ),[1,seq(i,i=3..1000)]);
搜索在0.006秒内完成
查找|欢迎光临|维基|注册|音乐|地块2|演示|索引|浏览|网络摄像头
贡献新序列。或评论|格式|样式表|变换|超级搜索|最近
OEIS社区|维护人OEIS基金会。
许可协议、使用条款、隐私政策。.
上次修改时间:2024年9月23日00:23 EDT。包含376140个序列。(在oeis4上运行。)
|