|
| |
|
|
A077114
|
|
Least k such that Z(k,5) <= Z(n,6) where Z(m,s) = sum( i>=m, 1/i^s).
|
|
0
| |
|
|
2, 2, 3, 4, 6, 8, 10, 12, 14, 16, 19, 21, 23, 26, 28, 31, 34, 36, 39, 42, 44, 47, 50, 53, 56, 59, 62, 65, 68, 71, 74, 77, 80, 83, 86, 89, 93, 96, 99, 102, 106, 109, 112, 116, 119, 123, 126, 129, 133, 136, 140, 143, 147, 150, 154, 158, 161, 165, 168, 172, 176, 179, 183
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,1
|
|
|
COMMENTS
| Cf. A051890 for least k such that such that Z(k,2) <= Z(n,3)
|
|
|
PROG
| (PARI) u=5; v=6; a(n)=if(n<0, 0, k=1; while((zeta(u)-sum(k=1, k-1, 1/k^u))>(zeta(v)-sum(i=1, n-1, 1/i^v)), k++); k)
|
|
|
CROSSREFS
| Sequence in context: A065417 A005860 A114541 * A118246 A116902 A066447
Adjacent sequences: A077111 A077112 A077113 * A077115 A077116 A077117
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Benoit Cloitre (benoit7848c(AT)orange.fr), Nov 29 2002
|
| |
|
|
