1,1

All terms of this sequence are even. Next term (if it exists) is greater than 25000000.

149868 is in the sequence because 149868=149717+151=P(1*4*9*8*6*8)+P(1+4+9+8+6+8).

Do[h=IntegerDigits[n]; l=Length[h]; If[ !MemberQ[h, 0]&& n==Prime[Product[h[[k]], {k, l}]]+Prime[Sum[h[[k]], {k, l}]], Print[n]], {n, 25000000}]

Cf. A099068, A099069.

Sequence in context: A044982 A081648 A025370 this_sequence A025361 A037159 A039547

Adjacent sequences: A099064 A099065 A099066 this_sequence A099068 A099069 A099070

base,more,nonn

Farideh Firoozbakht (mymontain(AT)yahoo.com), Oct 08 2004