A090473 Primes in A047783.
2, 2, 3, 5, 5, 7, 7, 7, 11, 11, 11, 13, 13, 13, 13, 17, 17, 17, 17, 19, 19, 19, 19, 23, 23, 23, 23, 29, 29, 29, 29, 29, 31, 31, 31, 31, 37, 37, 37, 37, 37, 41, 41, 41, 41, 41, 43, 43, 43, 43, 43, 47, 47, 47, 47, 47, 53, 53, 53, 53, 53, 53, 59, 59, 59, 59, 59, 59, 61, 61, 61, 61
Offset: 1
Crossrefs
Cf. A047783.
Programs
-
PARI
lip(n) = forstep(x=1,n,1,y=floor(-eint1(log(1/x)));if(isprime(y),print1(y",")))
Extensions
Edited by David Wasserman, Nov 16 2005
Comments