|
Search: id:A107613
|
|
|
| A107613 |
|
Numbers n such that both n and prime(n) consist of square digits (0,1,4,9). |
|
+0
1
|
|
| 94, 1140, 9109, 10404, 10449, 41104, 110000, 110010, 114101
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
COMMENT
|
Corresponding primes are: 491, 9199, 94441, 109441, 109919, 494441, 1441049, 1441199, 1499149. Cf. A061246 ( Primes with square digits).
|
|
MATHEMATICA
|
Do[id=Union[IntegerDigits[Prime[n]], IntegerDigits[n]]; If[Count[id, 2]+Count[id, 3]+Count[id, 5]+Count[id, 6]+Count[id, 7]+Count[id, 8]==0, Print[n]], {n, 200000}]
|
|
CROSSREFS
|
Cf. A061246.
Sequence in context: A116244 A086248 A093294 this_sequence A017810 A035742 A017757
Adjacent sequences: A107610 A107611 A107612 this_sequence A107614 A107615 A107616
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
Zak Seidov (zakseidov(AT)yahoo.com), May 17 2005
|
|
|
Search completed in 0.002 seconds
|
