|
Search: id:A097227
|
|
|
| A097227 |
|
Numbers n such that n = prime(d_1) * prime(d_2) * ... * prime(d_k), where d_1 d_2 ... d_k is the decimal expansion of n. |
|
+0
7
|
| |
|
|
OFFSET
|
1,1
|
|
|
COMMENT
|
The next term, if it exists, is greater than 1.2*10^10. - Hauke Worpel (thebigh(AT)outgun.com), Jan 20 2008
|
|
EXAMPLE
|
279174=prime(2)*prime(7)*prime(9)*prime(1)*prime(7)*prime(4) so 279174 is in the sequence.
|
|
MATHEMATICA
|
v={}; Do[h=IntegerDigits[n]; l=Length[h]; p=Product[h[[k]], {k, l}]; If[p>0&&Product[Prime[h[[k]]], {k, l}]==n, v=Append[v, n]; Print[v]], {n, 40000000}]
|
|
CROSSREFS
|
Cf. A097228.
Sequence in context: A153884 A154239 A016215 this_sequence A125426 A004986 A154248
Adjacent sequences: A097224 A097225 A097226 this_sequence A097228 A097229 A097230
|
|
KEYWORD
|
base,more,nonn
|
|
AUTHOR
|
Farideh Firoozbakht (mymontain(AT)yahoo.com), Aug 12 2004
|
|
|
Search completed in 0.002 seconds
|
