

A115078


Numbers k such that k = prime(1 + d_1)*prime(1 + d_2)*...*prime(1 + d_m), where d_1 d_2 ... d_m is the decimal expansion of k.


1




OFFSET

1,1


COMMENTS

a(9), if it exists, must have more than 32 digits.


LINKS



EXAMPLE

290 is a term because 290 = p(1+2)*p(1+9)*p(1+0) = 5*29*2.


MATHEMATICA

t={}; Do[If[n==Times@@Prime[1+IntegerDigits@n], Print[n]; AppendTo[t, n]], {n, 10^5}]; t


PROG

(PARI) is(n) = my(d=digits(n)); n==prod(i=1, #d, prime(1+d[i])) \\ Felix Fröhlich, Aug 12 2017


CROSSREFS



KEYWORD

base,nonn,more


AUTHOR



STATUS

approved



