|
Search: id:A064993
|
|
|
| A064993 |
|
Values for which A065358 is smaller than any preceding term. |
|
+0 1
|
|
| 35, 36, 837, 838, 1395, 1396, 1397, 1398, 1419, 1420, 1421, 1422, 1491, 1492, 1505, 1506, 1507, 1508, 1509, 1510, 1687, 1688, 1689, 1690, 1691, 1692, 1725, 1726, 1727, 1728, 1729, 1730, 1731, 1732, 1945, 1946, 1947, 1948, 1953, 1954, 1955, 1956, 1957
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
COMMENT
|
Robert G. Wilson v, personal communication.
|
|
MATHEMATICA
|
a = b = p = s = 0; Do[If[PrimeQ[n], p++ ]; s = s + (-1)^p; If[s < b, b = s; Print[n]], {n, 1, 10^3}]
|
|
CROSSREFS
|
Cf. A064973.
Adjacent sequences: A064990 A064991 A064992 this_sequence A064994 A064995 A064996
Sequence in context: A022991 A023477 A099647 this_sequence A041611 A064610 A030589
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Jason Earls (zevi_35711(AT)yahoo.com), Oct 31 2001
|
|
EXTENSIONS
|
More terms from Robert G. Wilson v (rgwv(AT)rgwv.com), Nov 03 2001
|
|
|
Search completed in 0.002 seconds
|