搜索: a075241-编号:a075242
|
|
A075242号
|
| 第n个复合数的倒数是素数的最小基数,如果不可能,则为零。 |
|
+10 5
|
|
|
0, 2, 4, 6, 2, 2, 2, 3, 8, 3, 2, 3, 2, 2, 2, 2, 9, 2, 6, 4, 3, 2, 3, 12, 6, 3, 2, 6, 2, 3, 2, 2, 3, 2, 9, 2, 3, 2, 2, 3, 2, 12, 2, 3, 12, 3, 6, 2, 3, 10, 6, 2, 3, 10, 2, 26, 2, 27, 2, 12, 3, 2, 9, 2, 12, 2, 2, 3, 2, 3, 2, 4, 3, 2, 34, 2, 3, 2, 6, 2, 3, 2, 38, 2, 2, 3, 4, 7, 24, 2, 2, 3, 2, 3, 18, 4, 18
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,2
|
|
评论
|
问题:除了4之外,是否有一个复合体不能通过基址反转成为质数?我没有发现第十种复合物。
|
|
链接
|
|
|
例子
|
a(1)=0,因为4(2)=1和4(3)=4,并且任何大于3的碱基总是给出复合物4作为其碱基反转。a(3)=4,因为8(2)=1,8(3)=8,但8(4)=2是素数。
|
|
数学
|
复合[n_]:=固定点[n+PrimePi[#]+1&,n];f[n_]:=块[{b=2},而[b<n&&!PrimeQ[FromDigits[Reverse[IntegerDigits[n,b]],b++];如果[b!=n,b,0]];表[f[组合[n]],{n,1,105}]
|
|
交叉参考
|
|
|
关键词
|
基础,容易的,非n
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|
|
|
|
2, 3, 11, 5, 13, 7, 11, 29, 19, 11, 19, 13, 29, 23, 19, 17, 23, 19, 31, 29, 29, 23, 29, 37, 37, 29, 31, 29, 43, 31, 37, 37, 59, 59, 43, 37, 41, 59, 43, 41, 59, 43, 47, 47, 53, 47, 59, 61, 59, 61, 59, 53, 67, 59, 59, 59, 61, 59, 73, 61, 71, 67, 79, 71, 89, 67, 71, 101, 89
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
2,1
|
|
评论
|
所有素数最终都会出现在序列中。
|
|
链接
|
|
|
例子
|
11_10=23_4,反向(23)=32,32_4=14_10,因此a(4)=11,因为这不适用于较小的素数。
|
|
数学
|
a={};Do[k=1;While[PrimeQ[FromDigits[Reverse[IntegerDigits[Prime[k],n]],n],k++];a=附加[a,素数[k]],{n,2,70}];一
|
|
黄体脂酮素
|
(PARI)a(n)=我的(p=2);while(isprime(from digits(Vecrev(digits,p,n),n)),p=下一个素数(p+1));p\\米歇尔·马库斯2021年3月28日
|
|
交叉参考
|
|
|
关键词
|
基础,容易的,非n
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|
|
|
|
2, 3, 15, 8, 109, 9, 119, 16, 27, 70, 2197, 36, 1265, 158, 213, 178, 4205, 126, 14189, 260, 273, 304, 4865, 120, 1295, 78, 81, 532, 44323, 150, 47317, 952, 771, 102, 16705, 492, 6209, 114, 1209, 2020, 132743, 294, 22945, 2834, 2721, 2276, 66455, 144
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,1
|
|
评论
|
问题,把自然数转换成素数需要每个基吗?
|
|
链接
|
|
|
例子
|
a(1)=2,因为一元中2=11(A000042号)其反转11=2。a(2)=3,因为基数2中的3=11(A007088号)以2=3为基数的反转11。a(3)=15,因为基数3中的十五=120(A007089号)以3为基数的反转21=7。a(4)=8->2。a(7)=119,因为119的基数7=230的基数7(A007093号)其反转32基7=161。
|
|
数学
|
f[n_]:=块[{b=2},而[b<n&&!PrimeQ[FromDigits[Reverse[IntegerDigits[n,b]],b++];如果[b!=n,b,0]];a=表[0,{70}];Do[b=f[n];如果[b<76&&a[[b]]==0,a[[b]]=n],{n,2,133000}]
|
|
交叉参考
|
|
|
关键词
|
基础,容易的,非n
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
搜索在0.043秒内完成
|