|
|
A048177号 |
| 素数p=d_1 d_2。。。使得对于一些碱基b,p=Sum_{i=1..k}b^d_i。 |
|
2
|
|
|
101, 1033, 101111, 1010203, 11111101, 101001001, 111010111, 1110011101, 1110110011, 10000110011, 10001000011, 10001001011, 10001011001, 10010000111, 10010001011, 10010100101, 10011000011, 10100000011, 10100000111, 10100011001, 10100101001, 10100110001, 10101111011, 10110000101, 10110100001, 10111000001, 10111202111, 11000010011, 11000010101, 11010000101, 11011011001, 11011101011, 11100000101
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,1
|
|
链接
|
|
|
例子
|
101=50^1+50^0+50^1
|
|
数学
|
isValid[n_]:=模块[{数字,b,totalSum,dcount},如果[!PrimeQ[n],返回[False]];数字=整数数字[n];dcount=数字计数[n];如果[Total[dcount[[{2,3,4,5,6,7,8,9}]]==0,dcount=DigitCount[n];如果[Mod[n-dcount[[10]],dcount[[1]]]==0,返回[True],返回[False]];];b=0;totalSum=0;而[totalSum<n,b++;totalSum=总计[b^位数];];如果[totalSum==n,返回[True],返回[False]];];对于[i=1,i<1000000,i++,如果[isValid[i],打印[i]];];(*Sam Handler(Sam_5_5_0(AT)yahoo.com),2006年8月17日*)
|
|
交叉参考
|
|
|
关键词
|
基础,非n
|
|
作者
|
|
|
扩展
|
来自Sam Handler(Sam_5_5_0(AT)yahoo.com)的更多条款,2006年8月17日
|
|
状态
|
经核准的
|
|
|
|