OFFSET
1,5
COMMENTS
a(n) >= 1.
EXAMPLE
MATHEMATICA
Table[If[Sum[(1 - Ceiling[(i*(n - i))/n] + Floor[(i*(n - i))/n]), {i, Floor[n/2]}] > 0, Sum[(1 - Ceiling[(i*(n - i))/n] + Floor[(i*(n - i))/n]), {i, Floor[n/2]}], {}], {n, 300}] // Flatten
CROSSREFS
KEYWORD
nonn
AUTHOR
Wesley Ivan Hurt, Jun 09 2020
STATUS
approved