A325056 Index of n-th low point in A076042.

0, 5, 10, 19, 34, 59, 104, 181, 314, 545, 946, 1639, 2840, 4921, 8524, 14765, 25574, 44297, 76726, 132895, 230182, 398687, 690548, 1196065, 2071646, 3588197, 6214940, 10764593, 18644824, 32293783, 55934474, 96881353, 167803426, 290644061, 503410282, 871932187

Offset: 0

Author

N. J. A. Sloane, Sep 04 2019

Keywords

• nonn

Links

• N. J. A. Sloane, Table of n, a(n) for n = 0..3999 (Terms up through a(42) from Giovanni Resta.)
• N. J. A. Sloane, Table of n, a(n) for n = 0..10000

Crossrefs

Cf. A076042, A324791, A324792.

If we use primes instead of squares we get A008348, A309226, A324782, A324783.

Programs

Maple

See A324791.

Mathematica

a=b=c=d=n=0; L={0}; While[Length[L] < 22, n++; a=b; b=c; c=d; d=c + If[c < n^2, n^2, -n^2]; If[a > b < c < d, AppendTo[L, n - 2]]]; L (* Giovanni Resta, Oct 01 2019 *)

PARI

\\ See PARI program in A076042.

Extensions

a(14)-a(17) added by N. J. A. Sloane, Sep 30 2019

More terms from Giovanni Resta, Oct 01 2019

Modified definition to make offset 0. - N. J. A. Sloane, Oct 02 2019