A190614 Values of n where A190613(n) < 0.

22, 46, 58, 70, 73, 78, 94, 106, 118, 126, 142, 145, 154, 166, 178, 190, 193, 214, 238, 241, 250, 262, 278, 286, 289, 298, 310, 313, 318, 334, 337, 346, 358, 361, 382, 406, 414, 418, 421, 430, 433, 438, 442, 446, 466, 478, 481, 498, 502, 505, 526, 538, 550, 558, 570, 574, 577

Offset

1,1

Links

Table of n, a(n) for n=1..57.

Mathematica

Flatten[Position[Table[Sum[(-1)^(n-Floor[n/k]) Floor[n/k], {k, n}], {n, 0, 600}], _?(#<0&)]]-1 (* Harvey P. Dale, May 05 2023 *)

Crossrefs

Sequence in context: A041966 A350321 A106838 * A281187 A335297 A158862

Adjacent sequences: A190611 A190612 A190613 * A190615 A190616 A190617

Keyword

nonn

Author

Franklin T. Adams-Watters, May 14 2011

Status

approved