|
|
A067250
|
|
Numbers n such that prime(n) = floor(n*log(n*omega(n))).
|
|
0
|
|
|
10, 57, 92, 99, 123, 124, 1677, 2485, 32578, 33165, 33220, 451140, 5954790
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
Next term, if it exists, is bigger than 2*10^6. - Stefan Steinerberger, Apr 09 2006
a(14) > 10^9. - Donovan Johnson, Aug 03 2009
|
|
LINKS
|
Table of n, a(n) for n=1..13.
|
|
MATHEMATICA
|
For[n = 200000, n < 2000000, n++, If[Prime[n] == Floor[n*Log[n*Length[FactorInteger[n]]]], Print[n]]] (* Stefan Steinerberger, Apr 09 2006 *)
|
|
CROSSREFS
|
Sequence in context: A116971 A200054 A034195 * A061005 A006550 A047780
Adjacent sequences: A067247 A067248 A067249 * A067251 A067252 A067253
|
|
KEYWORD
|
more,nonn
|
|
AUTHOR
|
Benoit Cloitre, Feb 20 2002
|
|
EXTENSIONS
|
a(12) from Stefan Steinerberger, Apr 09 2006
a(13) from Donovan Johnson, Aug 03 2009
|
|
STATUS
|
approved
|
|
|
|