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,2

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

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 *)

Prog

(PARI) \\ See PARI program in A076042.

Crossrefs

Cf. A076042, A324791, A324792.

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

Sequence in context: A047882 A184260 A053311 * A147390 A345715 A331142

Adjacent sequences: A325053 A325054 A325055 * A325057 A325058 A325059

Keyword

nonn

Author

N. J. A. Sloane, Sep 04 2019

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

Status

approved