OFFSET
1,1
COMMENTS
The next term (a(4)) has 242 digits. - Harvey P. Dale, Sep 13 2021
LINKS
Eric W. Weisstein, Table of n, a(n) for n = 1..5
Eric Weisstein's World of Mathematics, Constant Primes
Eric Weisstein's World of Mathematics, Integer Sequence Primes
Eric Weisstein's World of Mathematics, Natural Logarithm of 10 Digits
MATHEMATICA
Module[{nn=500, l10}, l10=RealDigits[Log[10], 10, nn][[1]]; Select[ Table[ FromDigits[ Take[l10, n]], {n, nn}], PrimeQ]] (* Harvey P. Dale, Sep 13 2021 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Eric W. Weisstein, Aug 17 2013
STATUS
approved