|
|
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
The logarithmic integral can be computed in PARI: Li(x) = -eint1(log(1/x)).
Next term is A089897(858), which has 256 digits.
In fact the prime terms are for n=2, 3, 5, 9, 10, 26, 57, 202, 858, 1508, 1552, 2285, 4244, (5000). - Robert G. Wilson v
|
|
LINKS
|
|
|
MATHEMATICA
|
Select[ Floor[ LogIntegral[ 2^Range[202]]], PrimeQ[ # ] &] (* Robert G. Wilson v, Nov 09 2005 *)
|
|
PROG
|
(PARI) lip(n) = forstep(x=1, n, 1, y=floor(-eint1(log(1/2^x))); if(isprime(y), print1(y", ")))
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|