|
| |
| |
|
|
|
1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 14, 15, 16, 18, 20, 21, 22, 24, 25, 27, 28, 30, 32, 33, 35, 36, 40, 42, 44, 45, 48, 49, 50, 54, 55, 56, 60, 63, 64, 66, 70, 72, 75, 77, 80, 81, 84, 88, 90, 96, 98, 99, 100, 101, 105, 108, 110, 112, 120, 121, 125, 126, 128, 131
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
1,2
|
|
|
评论
|
|
|
|
链接
|
|
|
|
配方奶粉
|
|
|
|
例子
|
10=2*5是一个术语，因为2和5都是回文。
110=2*5*11是一个术语，因为2、5和11是回文。
|
|
|
MAPLE公司
|
N： =5:#获取最多N位的所有术语
digrev:=程序（t）局部L；五十： =换算（t，基数，10）；
加（L[-i-1]*10^i，i=0..nops（L）-1）；
结束进程：
P素数：=[2,3,5,7,11]：
d从3到N乘以2 do
m： =（d-1）/2；
P素数：=P素数，选择（i素数，[seq（seq（n*10^（m+1）+y*10^m+digrev（n），y=0..9），n=10^；
日期：
P素数：=映射（op，[P素数]）：
M： =10^N：
B： =矢量（M）；
B[1]：=1：
对于p中的p primes do
对于从1到地板的k（log[p]（M））do
R： =[1..美元（M/p^k）]；
B[p^k*R]：=B[p^k*R]+B[R]
操作系统
日期：
选择（t->B[t]>0，[1..M]美元）#罗伯特·伊斯雷尔2015年7月5日
#备选方案
isA033620:=进程（n）
numtheory[因子集]（n）do中的d
如果不是A002113（op（1，d）），则
返回false；
结束条件：；
结束do；
真；
结束进程：
对于从1到300 do的n
如果是A033620（n），则
printf（“%d，”，n）；
结束条件：；
|
|
|
数学
|
palQ[n_]：=反向[x=整数位数[n]]==x；选择[Range[131]，然后选择@@palQ/@First/@FactorInteger[#]&](*贾扬达·巴苏2013年6月5日*）
|
|
|
黄体脂酮素
|
（哈斯克尔）
a033620 n=a033620列表！！（n-1）
a033620_list=过滤器chi[1..]，其中
chin n=a136522 spf==1&&（n’==1|| chin’）其中
n’=n `div`spf
（PARI）ispal（n）=n=数字（n）；对于（i=1，#n\2，如果（n[i]！=n[#n+1-i]，返回（0））；1
is（n）=如果（n<13，n>0，vecmin（应用（ispal，系数（n）[，1]））\\查尔斯·格里特豪斯四世2013年2月6日
（Python）
从症状输入isprime，primefactors
定义pal（n）：s=str（n）；返回s==s[：：-1]
def ok（n）：为素数（n）中的f返回全部（pal（f））
|
|
|
交叉参考
|
|
|
|
关键词
|
非n,基础,容易的
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
|
