OFFSET
2,27
COMMENTS
Compare with sum_{i=1..n} 1/prime(n).
This sequence also appears to diverge, with a(n) >= 3 for n >= 8718.
MATHEMATICA
s = 0; Table[Floor[s = s + 1/(n*Log[n])], {n, 2, 88}] (* T. D. Noe, Nov 15 2013 *)
PROG
(JavaScript)
s=0;
for (i=2; i<600; i++) {
s+=1/(i*Math.log(i));
document.write(Math.floor(s)+", ");
}
CROSSREFS
KEYWORD
nonn
AUTHOR
Jon Perry, Nov 11 2013
STATUS
approved