|
Search: id:A134412
|
|
| |
|
| 1, 2, 3, 7, 23, 29, 31, 37, 43, 23, 47, 53, 59, 31, 127, 139, 151, 163, 167, 179, 191, 197, 67, 71, 73, 223, 229, 241, 61, 41, 43, 131, 137, 139, 71, 571, 193, 197, 599, 607, 631, 643, 647, 659, 683, 691, 233, 241, 1213, 1223, 3709, 3769, 3889, 3929, 4049, 4079
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
COMMENT
|
With the exception of the initial 1, all terms of this sequence are primes.
|
|
MATHEMATICA
|
a = {1}; s = 1; Do[i = 1; While[ ! PrimeQ[Numerator[s + 1/i]], i++ ]; s = s + 1/i; AppendTo[a, Numerator[s]], {80}]; a - Stefan Steinerberger (stefan.steinerberger(AT)gmail.com), Oct 27 2007
|
|
CROSSREFS
|
Cf. A134411, A134413.
Sequence in context: A077210 A072214 A007660 this_sequence A005115 A113872 A120302
Adjacent sequences: A134409 A134410 A134411 this_sequence A134413 A134414 A134415
|
|
KEYWORD
|
frac,nonn
|
|
AUTHOR
|
Leroy Quet (q1qq2qqq3qqqq(AT)yahoo.com), Oct 24 2007
|
|
EXTENSIONS
|
More terms from Stefan Steinerberger (stefan.steinerberger(AT)gmail.com), Oct 27 2007
|
|
|
Search completed in 0.002 seconds
|
