A077117 Least k such that Z(k,6) <= Z(n,7) where Z(m,s) = Sum_{i>=m} 1/i^s.

2, 2, 3, 4, 6, 7, 9, 11, 13, 15, 16, 18, 20, 23, 25, 27, 29, 31, 33, 35, 38, 40, 42, 45, 47, 49, 52, 54, 56, 59, 61, 64, 66, 69, 71, 74, 76, 79, 81, 84, 86, 89, 92, 94, 97, 100, 102, 105, 108, 110, 113, 116, 119, 121, 124, 127, 130, 132, 135, 138, 141, 144, 146, 149

Offset

0,1

Links

Table of n, a(n) for n=0..63.

Prog

(PARI) u=6; v=7; 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

Cf. A051890 for least k such that Z(k,2) <= Z(n,3).

Sequence in context: A130291 A067835 A029011 * A237976 A035365 A335745

Adjacent sequences: A077114 A077115 A077116 * A077118 A077119 A077120

Keyword

nonn

Author

Benoit Cloitre, Nov 29 2002

Status

approved