搜索: a062339-编号:a062338
|
|
|
|
59999999, 69999899, 69999989, 78998999, 88989899, 88999979, 89699999, 89799989, 89989799, 89989979, 89997899, 89997989, 89999699, 89999969, 97889999, 98699999, 98879999, 98899799, 98979989, 98988899, 98989889, 98997989, 98998979, 98999969
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,1
|
|
链接
|
|
|
例子
|
69999899是一个数位和=68的素数,因此属于序列。
|
|
数学
|
选择[Prime[Range[10000000]],Total[Integer Digits[#]]==68&]
|
|
黄体脂酮素
|
(Magma)[p:p in PrimesUpTo(100000000)|&+Intseq(p)eq 68];
(Python)#请参阅中的代码A107579号:通过给出数字和68的初始项p=6*10**7-1,可以使用相同的代码生成此序列-M.F.哈斯勒2022年3月16日
|
|
交叉参考
|
|
|
关键词
|
非n,基础
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|
|
|
|
18, 21, 27, 42, 45, 63, 84, 111, 114, 117, 133, 152, 153, 156, 171, 190, 195, 198, 201, 207, 209, 222, 228, 247, 261, 266, 285, 333, 370, 372, 399, 402, 407, 423, 444, 465, 481, 511, 516, 518, 531, 555, 558, 592, 603
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,1
|
|
评论
|
|
|
参考文献
|
Bill Moran,第2074题:Moran数,J.Rec.数学。,第25卷第3期,第215页,1993年。
|
|
链接
|
阿明·维特诺,数字和乘以素数的因子《国际计算机科学和数学开放问题杂志》3:2(2010),第132-136页。
|
|
数学
|
|
|
黄体脂酮素
|
(哈斯克尔)
导入数据。列表(findIndices)
a001101 n=a001101_列表!!(n-1)
a001101_list=映射成功$findIndices p[1..]其中
p n=m==0&&a010051 n’==1,其中
(n’,m)=divMod n(a007953 n)
(PARI)为(n)=(k->分母(k)==1&&isprime(k))(n/sumdigits(n))\\查尔斯·格里特豪斯四世2014年1月10日
(Python)
#1000000素数:https://primes.utm.edu/lists/small/millions/primes1.zip
#“primes1.txt”在执行之前必须格式化为b文件
导入csv
打开(“primes1.txt”,“r”)为f:
….reader=csv.reader(f,delimiter=“”)
….素数=set([int(rows[1])for rows in reader])
i、 n=1,1
打开(“b001101.txt”,“w”)为f:
….当i<=10000时:
……..如果素数中的n%sum(map(int,str(n)))==0且n/sum(map
…………f.write(“{}{}\n”.format(i,n))
…………i+=1
……….n+=1
(Python)
从sympy导入isprime
定义确定(n):s=总和(映射(int,str(n)));返回s和n%s==0和isprime(n//s)
打印([k代表范围(604)中的k,如果正常(k)])#迈克尔·布拉尼基2022年3月28日
|
|
交叉参考
|
|
|
关键词
|
非n,基础,美好的
|
|
作者
|
比尔·莫兰(moran1(AT)llnl.gov)
|
|
扩展
|
|
|
状态
|
经核准的
|
|
|
|
|
|
|
5, 23, 41, 113, 131, 311, 401, 1013, 1031, 1103, 1301, 2003, 2111, 3011, 4001, 10103, 10211, 10301, 11003, 12011, 12101, 13001, 20021, 20201, 21011, 21101, 30011, 100103, 101021, 101111, 102101, 103001, 120011, 121001, 200003, 200201, 201011, 201101, 202001
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,1
|
|
链接
|
|
|
配方奶粉
|
|
|
例子
|
1301属于序列,因为它是数字和=5的素数。
|
|
MAPLE公司
|
T: =n->`if`(n=1,5,排序(选择(isprime,[seq(seq(
10^(n-1)+1+10^i+10^j+10^k,k=1..j),j=1..i),i=1..n-1),
序列(10^(n-1)+3+10^i,i=1..n-1))[]):
|
|
数学
|
选择[Prime[Range[20000]],Total[Integer Digits[#]]==5&](*哈维·P·戴尔2013年11月24日*)
|
|
黄体脂酮素
|
(Magma)[p:p in PrimesUpTo(250000)|&+Intseq(p)eq 5]//文森佐·利班迪2014年7月8日
(Python)
从sympy导入素数范围作为素数
def-ok(p):返回和(map(int,str(p)))==5
打印(列表(过滤器(ok,素数(1202002)))#迈克尔·布拉尼基2021年5月23日
(PARI)
选择({是_A062341号(p,s=5)=sumdigits(p)==s&&isprime(p)},primes([1,10^6]))\\其他数字和的类似序列的第二个可选参数。
A062341号_upto_length(L,s=5,a=List(),u=[10^k|k<-[0..L-1]])={forvec(d=[[1,L]|i<-[1..s]],isprime(p=vecsum(vecextract(u,d)))&&listput(a,p),1);Set(a)}\\(End)
|
|
交叉参考
|
|
|
关键词
|
非n,基础,容易的
|
|
作者
|
|
|
扩展
|
由Larry Reeves(larryr(AT)acm.org)更正和扩展,2001年7月6日
|
|
状态
|
经核准的
|
|
|
|
|
|
|
17, 53, 71, 107, 233, 251, 431, 503, 521, 701, 1061, 1151, 1223, 1511, 1601, 2141, 2213, 2411, 3023, 3041, 3203, 3221, 4013, 4211, 5003, 5021, 6011, 6101, 7001, 10007, 10061, 10133, 10151, 10223, 10313, 10331, 10601, 11213, 11321, 11411
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,1
|
|
链接
|
|
|
配方奶粉
|
|
|
例子
|
1151属于序列,因为它是数字之和=8的素数。
|
|
数学
|
选择[Prime[Range[500000]],Total[Integer Digits[#]]==8&](*文森佐·利班迪2014年7月8日*)
|
|
黄体脂酮素
|
(Magma)[p:p in PrimesUpTo(20000)|&+Intseq(p)eq 8]//文森佐·利班迪2014年7月8日
(PARI)选择({是_A062343号(p,s=8)=sumdigits(p)==s&&isprime(p)},primes([112345]))\\具有其他数字和的类似序列的第二个可选参数。
(PARI){A062343号_upto_length(L,s=8,a=List(),u=[10^(L-k)|k<-[1..L]])=forvec(d=[[1,L]|i<-[1.s]],isprime(p=vecsum(vecextract(u,d)))&&listput(a,p),1);Vecrev(a)}\\(完)
|
|
交叉参考
|
|
|
关键词
|
非n,基础,容易的
|
|
作者
|
|
|
扩展
|
拉里·里夫斯的更多术语(larryr(AT)acm.org),2001年7月6日
|
|
状态
|
经核准的
|
|
|
|
|
|
|
19, 37, 73, 109, 127, 163, 181, 271, 307, 433, 523, 541, 613, 631, 811, 1009, 1063, 1117, 1153, 1171, 1423, 1531, 1621, 1801, 2017, 2053, 2143, 2161, 2251, 2341, 2503, 2521, 3061, 3313, 3331, 3511, 4051, 4231, 5023, 5113, 6121, 6211, 6301, 8011, 8101
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,1
|
|
评论
|
|
|
链接
|
Michael S.Branicky,n=1..10000时的n,a(n)表(文森佐·利班迪(Vincenzo Librandi)和扎克·塞多夫(Zak Seidov)的术语1001..3000,文森佐·利班迪的术语1..1000)
|
|
配方奶粉
|
|
|
MAPLE公司
|
a: =proc(n)local nn:nn:=convert(n,base,10):如果isprime(n)=true并加(nn[j],j=1..nops(nn))=10,则n else end if end proc:seq(a(n),n=1..10^4)#Emeric Deutsch公司2008年3月6日
|
|
数学
|
选择[Prime[Range[100000]],Total[Integer Digits[#]]==10&](*文森佐·利班迪2014年7月8日*)
|
|
黄体脂酮素
|
(Magma)[p:p in PrimesUpTo(10000)|&+Intseq(p)eq 10]//文森佐·利班迪2014年7月8日
(PARI)表示质数(p=198101,如果(10==总和(p),打印(p“,”))\\扎克·塞多夫2016年10月8日
(Python)
从itertools导入计数,islice
从sympy导入isprime
从sympy.utilities.iterables导入multiset_permutations
def-agen(b=10,sod=10):#任意基的生成器,数字和
如果0<=sod<b:
产草量
nzdigs=[i表示i在范围(1,b)内,如果i<=sod]
nzmultiset=[]
对于范围(1,b)中的d:
nzmultiset+=[d]*(sod//d)
对于计数(2)中的d:
完整多集=[0]*(d-1-(sod-1)//(b-1))+nzmultiset
对于nzdigs中的firstdig:
target_sum,restmultiset=sod-int(firstdig),fullmultiset[:]
restmultiset.remove(第一次挖掘)
对于multiset_permutations(restmultiset,d-1)中的p:
如果总和(p)==目标总和:
t=int(“”.join(map(str,[firstdig]+p)),b)
如果是质数(t):
产量t
如果p[0]==目标总和:
打破
打印(列表(islice(agen(),45))#迈克尔·布拉尼基2022年3月10日
(Python)
从sympy导入isprime
“返回所有素数序列的生成器>=p,其数字和与p相同。”
为True时:
如果是素数(p):产生p
|
|
交叉参考
|
|
|
关键词
|
非n,基础
|
|
作者
|
|
|
扩展
|
|
|
状态
|
经核准的
|
|
|
|
|
|
|
29, 47, 83, 137, 173, 191, 227, 263, 281, 317, 353, 443, 461, 641, 821, 911, 1019, 1091, 1109, 1163, 1181, 1217, 1307, 1361, 1433, 1451, 1523, 1613, 1721, 1811, 1901, 2027, 2063, 2081, 2153, 2207, 2243, 2333, 2351, 2423, 2441, 2531, 2621, 2711, 2801, 3251
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,1
|
|
链接
|
|
|
配方奶粉
|
|
|
数学
|
选择[Prime[范围[100000]],Total[整数位数[#]]==11&](*文森佐·利班迪2014年7月8日*)
|
|
黄体脂酮素
|
(Magma)[p:p in PrimesUpTo(10000)|&+Intseq(p)eq 11]//文森佐·利班迪2014年7月8日
|
|
交叉参考
|
|
|
关键词
|
非n,基础
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|
|
|
|
1, 3, 7, 10, 28, 36, 67, 81, 147, 483, 643, 1020, 1900, 2620, 10453, 27720, 52824, 105589, 111988, 618853, 665829
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,2
|
|
评论
|
一些结果是使用PrimeFormGW(PFGW)初级测试程序计算的-雨果·普费尔特纳2019年11月14日
|
|
链接
|
S.W.Golomb,序列3.2^n+1的属性,数学。公司。,30 (1976), 657-663. [带注释的扫描副本]
|
|
配方奶粉
|
|
|
例子
|
k=3给出(3*10^3+1)=3000+1=3001,这是素数。
|
|
数学
|
做[If[PrimeQ[3*10^k+1],打印[k]],{k,0,20000}]
|
|
黄体脂酮素
|
|
|
交叉参考
|
|
|
关键词
|
非n,更多
|
|
作者
|
|
|
扩展
|
Julien Peter Benney的a(13)和a(14)(jpbenney(AT)ftml.net),2004年11月23日
a(18)来自Roman Makarchuk,2008年12月5日,确认为下一任期雷·钱德勒2012年3月2日
a(19)Alexander Gramolin,2012年2月24日,确认为下一任期雷·钱德勒2012年3月2日
a(20)-a(21)根据Kamada数据罗伯特·普莱斯2015年1月26日
|
|
状态
|
经核准的
|
|
|
|
|
|
|
19999999, 29999899, 29999989, 39979999, 39999979, 47999899, 48899899, 48989989, 48997999, 48999799, 48999889, 49989799, 49999699, 49999897, 56999989, 58799899, 58898989, 58988899, 58997899, 59698999, 59788999
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,1
|
|
链接
|
|
|
数学
|
选择[Prime[Range[3600000]],Total[Integer Digits[#]]==64&](*哈维·P·戴尔2012年1月19日*)
|
|
黄体脂酮素
|
(Magma)[p:p in PrimesUpTo(69000000)|&+Intseq(p)eq 64]//文森佐·利班迪2014年7月9日
|
|
交叉参考
|
|
|
关键词
|
非n,基础
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|
|
|
|
9899999, 18899999, 18999989, 19899989, 19998899, 19998989, 27989999, 27999899, 28998989, 28999979, 29789999, 29798999, 29969999, 29979899, 29988899, 29988989, 29989889, 29997899, 29998799, 29998889, 29999699, 36998999
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,1
|
|
链接
|
|
|
数学
|
选择[Prime[Range[6000000]],Total[Integer Digits[#]]==62&](*文森佐·利班迪2014年7月9日*)
|
|
黄体脂酮素
|
(岩浆)[p:p在PrimesUpTo(38000000)|&&+Intseq(p)eq 62]中//文森佐·利班迪2014年7月9日
|
|
交叉参考
|
|
|
关键词
|
非n,基础
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|
|
|
|
59, 149, 167, 239, 257, 293, 347, 383, 419, 491, 509, 563, 617, 653, 743, 761, 941, 1049, 1193, 1229, 1283, 1319, 1373, 1409, 1427, 1481, 1553, 1571, 1607, 1733, 1823, 1913, 1931, 2039, 2129, 2237, 2273, 2309, 2381, 2417, 2543, 2633, 2741, 2903, 3083
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,1
|
|
评论
|
|
|
链接
|
|
|
配方奶粉
|
|
|
数学
|
选择[Prime[Range[10000]],Total[Integer Digits[#]]==14&](*文森佐·利班迪2014年7月8日*)
|
|
黄体脂酮素
|
(Magma)[p:p in PrimesUpTo(4000)|&&+Intseq(p)eq 14]//文森佐·利班迪2014年7月8日
|
|
交叉参考
|
|
|
关键词
|
非n,基础
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
搜索在0.016秒内完成
|