|
| |
|
|
A164322
|
|
Numbers n such that n=prime(P)+sigma(P), where P is product of digits of n.
|
|
2
| | |
|
|
|
OFFSET
| 1,1
|
|
|
COMMENTS
| The product of the digits of next term (if it exists) is greater than 2*10^8.
|
|
|
EXAMPLE
| 25688777=prime(2*5*6*8*8*7*7*7)+sigma(2*5*6*8*8*7*7*7), so 25688777 is in the
sequence.
|
|
|
MATHEMATICA
| Do[If[n=Prime[m]+DivisorSigma[1, m]; m==Apply[Times, IntegerDigits[n]], Print[n]],
{m, 200000000}]
|
|
|
CROSSREFS
| Cf. A000040, A000203, A164323, A164324.
Sequence in context: A079176 A013754 A073940 * A159430 A013800 A013870
Adjacent sequences: A164319 A164320 A164321 * A164323 A164324 A164325
|
|
|
KEYWORD
| base,more,nonn,bref
|
|
|
AUTHOR
| Farideh Firoozbakht (mymontain(AT)yahoo.com), Aug 13 2009
|
| |
|
|
