OFFSET
1
COMMENTS
FORMULA
a(n) = 1 if A064784(n) < n, and a(n) = 0 otherwise. - Kevin Ryde, May 24 2023
EXAMPLE
The natural number array has this corner:
1, 2, 4, 7, 11, 16, 22, 29, ...
3, 5, 8, 12, 17, 23, 30, 38, ...
6, 9, 13, 18, 24, 31, 39, 48, ...
10, 14, 19, 25, 32, 40, 49, 59, ...
15, 20, 26, 33, 41, 50, 60, 71, ...
21, 27, 34, 42, 51, 61, 72, 84, ...
in which the squares 1,4,9,16,25, are in these antidiagonals:
(1), (4,5,6), (7,8,9,10), (16,17,18,19,20,21).
MAPLE
[seq](floor(sqrt(n*(n+1)/2))-floor(sqrt((n-1)*n/2)), n=1..200); # Robert Israel, Mar 14 2023
MATHEMATICA
r[n_] := Range[n (n - 1)/2 + 1, n (n + 1)/2];
t = Table[Intersection[r[n], Range[120]^2], {n, 1, 120}];
Map[Length, t]
PROG
(PARI) a(n) = my(r); sqrtint((n^2+n)>>1, &r); r<n; \\ Kevin Ryde, May 24 2023
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Clark Kimberling, Mar 11 2023
STATUS
approved