|
|
A230820型 |
| 以十进制表示的以b为基数的回文素数的反对偶表。 |
|
2
|
|
|
3, 2, 5, 2, 13, 7, 2, 3, 23, 17, 2, 3, 5, 151, 31, 2, 3, 31, 17, 173, 73, 2, 3, 5, 41, 29, 233, 107, 2, 3, 5, 7, 67, 59, 757, 127, 2, 3, 5, 71, 37, 83, 257, 937, 257, 2, 3, 5, 7, 107, 43, 109, 373, 1093, 313, 2, 3, 5, 7, 73, 157, 61, 701, 409, 1249, 443
(列表;桌子;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,1
|
|
链接
|
|
|
例子
|
\第页
b条\
.2.3...5...7...17...31...73..107..127...257...313...443..1193..1453..1571.=A016041号
.3.2..13..23..151..173..233..757..937..1093..1249..1429..1487..1667..1733.=A029971号
.4.2...3...5...17...29...59..257..373...409...461...509...787...839...887.=A029972号
.5.2...3..31...41...67...83..109..701...911..1091..1171..1277..1327..1667.=A029973号
.6.2...3...5....7...37...43...61...67...191...197..1297..1627..1663..1699.=A029974号
.7.2...3...5...71..107..157..257..271...307..2549..2647..2801..3347..3697.=A029975号
.8.2...3...5....7...73...89...97..113...211...227...251...349...373...463.=A029976美元
.9.2...3...5....7..109..127..173..191...227...337...373...419...601...619.=A029977美元
10.2…3…5…7…11…101…131…151…181…191…313…353…373…383=A002385号
11.2...3...5....7..199..277..421..443...499...521...587...643...709...743.=A029978号
12.2...3...5....7...11...13..157..181...193...229...241...277...761...773.=A029979号
...
参考文献2..3..5..7.11.13..17..19..23..29..37..37..41..53..53..61=A000040型
|
|
MAPLE公司
|
选项记忆;
局部a、dgs;
如果n=1,则
如果b=2,则
返回3;
其他的
返回2;
结束条件:;
其他的
对于procname(b,n-1)+1 do中的a
如果是质数(a),则
ispal:=真;
dgs:=转换(a,base,b);
对于i从1到nops(dgs)/2 do
如果op(i,dgs)<>op(-i,dgs),则
ispal:=false;
结束条件:;
结束do:
如果ispal那么
返回a;
结束条件:;
结束条件:;
结束do:
结束条件:;
结束进程:
对于b从2到9 do
n从1到9 do
结束do:
printf(“\n”);
|
|
数学
|
palQ[n_Integer,base_Integer]:=模块[{idn=IntegerDigits[n,base]},idn==反向@idn];表[选择[Prime@范围@500,palQ[#,k+1]&][[b-k+1]],{b,11},{k,b,1,-1}]//扁平
|
|
交叉参考
|
囊性纤维变性。A000040型,A016041号,A029971美元,A029972美元,A029973号,A029974号,A029975号,A029976美元,A029977号,A002385号,A029978号,A029979号,A029980型,A029981号,A029982号,A029732号,A182231号.
|
|
关键字
|
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|