OFFSET
1,1
COMMENTS
A subsequence of A112013. There is no further term up to 3*10^10.
a(7) > 2.07*10^12. - Giovanni Resta, Feb 27 2013
a(7) > 10^17. - Chai Wah Wu, Apr 15 2021
EXAMPLE
619=prime(6*19), so 619 is in the sequence.
MATHEMATICA
Do[If[h=IntegerDigits[Prime[m]]; m==h[[1]]*FromDigits[Delete[h, 1]],
Print[Prime[m]}]], {m, 355000}]
CROSSREFS
KEYWORD
hard,more,nonn,base
AUTHOR
Farideh Firoozbakht, Oct 14 2009
EXTENSIONS
a(6) from Giovanni Resta, Feb 27 2013
STATUS
approved