|
Search: id:A016040
|
|
|
| A016040 |
|
Floor [ ln Product_{k=1..n} prime(k) ]. |
|
+0
3
|
|
| 0, 1, 3, 5, 7, 10, 13, 16, 19, 22, 26, 29, 33, 37, 40, 44, 49, 53, 57, 61, 65, 70, 74, 79, 83, 88, 92, 97, 102, 107, 111, 116, 121, 126, 131, 136, 141, 146, 151, 157, 162, 167, 172, 177, 183, 188, 193, 199, 204, 210, 215, 221, 226, 232, 237, 243, 248
(list; graph; listen)
|
|
|
OFFSET
|
1,3
|
|
|
REFERENCES
|
J. W. Sander, A story of binomial coefficients and primes, Amer. Math. Monthly 102 (1995), 802-807.
|
|
MATHEMATICA
|
Table[Floor[N[Sum[Log[Prime[x]], {x, 1, n}]]], {n, 1, 1000}] - Artur Jasinski (grafix(AT)csl.pl), Jan 23 2007
|
|
CROSSREFS
|
Sequence in context: A130257 A079511 A062430 this_sequence A003070 A036604 A001768
Adjacent sequences: A016037 A016038 A016039 this_sequence A016041 A016042 A016043
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Robert G. Wilson v (rgwv(AT)rgwv.com)
|
|
|
Search completed in 0.002 seconds
|
