|
Search: id:A164322
|
|
|
| A164322 |
|
Numbers n such that n=prime(P)+sigma(P), where P is product of digits of n. |
|
+0
3
|
| |
|
|
OFFSET
|
1,1
|
|
|
COMMENT
|
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 this_sequence A159430 A013800 A013870
Adjacent sequences: A164319 A164320 A164321 this_sequence A164323 A164324 A164325
|
|
KEYWORD
|
base,more,nonn,bref
|
|
AUTHOR
|
Farideh Firoozbakht (mymontain(AT)yahoo.com), Aug 13 2009
|
|
|
Search completed in 0.002 seconds
|
