|
| |
|
|
A090720
|
|
Primes whose representation in base 512 can be interpreted as a decimal prime.
|
|
0
| |
|
|
2, 3, 5, 7, 521, 1033, 1543, 3079, 3593, 4099, 262147, 262151, 262153, 266759, 524801, 789001, 789511, 791047, 1051649, 1310723, 1312769, 1314823, 1572871, 1573379, 1574401, 1575433, 1835017, 1836553, 2098183, 2098697, 2100227
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
MATHEMATICA
| okQ[n_]:=Module[{idn512=IntegerDigits[n, 512]}, And@@(#<10&/@idn512)&&PrimeQ[FromDigits[idn512]]]
Select[Prime[Range[400000]], okQ] [From Harvey P. Dale, Dec. 28, 2010]
|
|
|
CROSSREFS
| Sequence in context: A083183 A046477 A145843 * A114780 A134811 A046479
Adjacent sequences: A090717 A090718 A090719 * A090721 A090722 A090723
|
|
|
KEYWORD
| base,nonn
|
|
|
AUTHOR
| Cino Hilliard (hillcino368(AT)gmail.com), Jan 18 2004
|
|
|
EXTENSIONS
| Better definition and offset corrected by Omar E. Pol (info(AT)polprimos.com), Dec 24 2008
|
| |
|
|
