|
Search: id:A115515
|
|
|
| A115515 |
|
a(n) = largest m such that the harmonic number H(m)= Sum_{i=1..m} 1/i is < n. |
|
+0
2
|
|
| 0, 3, 10, 30, 82, 226, 615, 1673, 4549, 12366, 33616, 91379, 248396, 675213, 1835420, 4989190, 13562026, 36865411, 100210580, 272400599, 740461600, 2012783314, 5471312309, 14872568830, 40427833595, 109894245428
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
MAPLE
|
c:=0: H[0]:=0: for n from 1 to 10^4 do H[n]:=1/n+H[n-1]: if floor(H[n])-floor(H[n-1])=1 then c:=1+c: b[c]:=n-1: else c:=c: fi: od: seq(b[j], j=1..c); (Emeric Deutsch)
|
|
CROSSREFS
|
Apart from the initial values, this is simply A002387(n)-1. Cf. A004080.
Sequence in context: A026960 A026990 A027256 this_sequence A117869 A092756 A027205
Adjacent sequences: A115512 A115513 A115514 this_sequence A115516 A115517 A115518
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Artur Jasinski (grafix(AT)csl.pl), Jan 23 2006
|
|
|
Search completed in 0.002 seconds
|
