login
A291197
Second differences of frac(n/log(n)) rounded, n >= 2.
1
0, -1, 1, 0, 0, -1, 1, 0, 0, -1, 1, 0, 0, -1, 1, 0, 0, 0, -1, 1, 0, 0, 0, -1, 1, 0, 0, -1, 1, 0, 0, 0, -1, 1, 0, 0, 0, -1, 1, 0, 0, 0, -1, 1, 0, 0, 0, 0, -1, 1, 0, 0, 0, -1, 1, 0, 0, 0, -1, 1, 0, 0, 0, 0, -1, 1, 0, 0, 0, -1, 1, 0, 0, 0, 0, -1, 1, 0, 0, 0, 0, -1, 1, 0, 0, 0, -1, 1, 0, 0, 0, 0, -1
OFFSET
2
COMMENTS
The second differences are very close to -1, 0 or 1.
Second differences of floor(-n/log(n)). - Robert Israel, Aug 20 2017
LINKS
MAPLE
A0:= [seq(frac(n/log(n)), n=2..100)]:
seq(round(A0[n+2]-2*A0[n+1]+A0[n]), n=1..nops(A0)-2); # Robert Israel, Aug 20 2017
MATHEMATICA
Differences[Table[Floor[-n/Log[n]], {n, 2, 100}], 2] (* Harvey P. Dale, Jan 05 2019 *)
CROSSREFS
Sequence in context: A288670 A057215 A284905 * A269927 A374468 A246146
KEYWORD
sign
AUTHOR
Simon Plouffe, Aug 20 2017
STATUS
approved