login
A190614
Values of n where A190613(n) < 0.
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
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
KEYWORD
nonn
AUTHOR
STATUS
approved