A164322 Numbers n such that n=prime(P)+sigma(P), where P is product of digits of n.

14, 67673, 25688777

Offset

1,1

Comments

The product of the digits of next term (if it exists) is greater than 2*10^8.

Links

Table of n, a(n) for n=1..3.

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: A344668 A013754 A073940 * A372084 A159430 A013800

Adjacent sequences: A164319 A164320 A164321 * A164323 A164324 A164325

Keyword

base,more,nonn,bref

Author

Farideh Firoozbakht, Aug 13 2009

Status

approved