|
Search: id:A099937
|
|
|
| A099937 |
|
Primes not of the form floor(k+(1/2)*Log(k)^2). |
|
+0
1
|
|
| 5, 37, 97, 421, 673, 2659, 3407, 3847, 7703, 13229, 176921
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
MATHEMATICA
|
lmt = 10^6; Complement[ Table[ Prime[n], {n, PrimePi[ Floor[lmt + Log[lmt]^2/2]]}], Select[ Table[ Floor[n + Log[n]^2/2], {n, lmt}], PrimeQ[ # ] &]] (from Robert G. Wilson v Nov 14 2004)
|
|
CROSSREFS
|
Sequence in context: A127589 A031913 A054587 this_sequence A142036 A089195 A023289
Adjacent sequences: A099934 A099935 A099936 this_sequence A099938 A099939 A099940
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Roger L. Bagula (rlbagulatftn(AT)yahoo.com), Nov 12 2004
|
|
EXTENSIONS
|
Edited and extended by Robert G. Wilson v (rgwv(AT)rgwv.com), Nov 14 2004
|
|
|
Search completed in 0.002 seconds
|
