|
| |
|
|
A066306
|
|
Prime numbers such that sum of digits equals product of digits.
|
|
4
| |
|
|
2, 3, 5, 7, 2141, 2411, 4211, 11251, 12511, 15121, 21221, 25111, 1112171, 1127111, 1172111, 1271111, 7112111, 11112811, 11128111, 11218111, 12111811, 12118111, 12181111, 18211111, 81111211, 81112111
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
EXAMPLE
| 2141=p[323], 2.1.4.1=8=2+4+1+1.
|
|
|
MATHEMATICA
| f[n_] := IntegerDigits[ Prime[n]]; Prime[ Select[ Range[ PrimePi[10^10]], Apply[Plus, f[ # ]] == Apply[Times, f[ # ]] & ]]
|
|
|
CROSSREFS
| Primes from A034710.
Cf. A061672, A000040, A066307.
Sequence in context: A109208 A050665 A090721 * A037948 A007659 A145380
Adjacent sequences: A066303 A066304 A066305 * A066307 A066308 A066309
|
|
|
KEYWORD
| base,nonn
|
|
|
AUTHOR
| Labos E. (labos(AT)ana.sote.hu), Dec 13 2001
|
|
|
EXTENSIONS
| More terms from Robert G. Wilson v (rgwv(AT)rgwv.com), Dec 27 2001
|
| |
|
|
