A356641 Indices of records in A356640.

2, 3, 4, 8, 10, 12, 14, 16, 25, 33, 56, 63, 64, 75, 78, 81, 93, 120, 121, 125, 144, 160, 162, 169, 172, 196, 216, 225, 237, 244, 256, 288, 320, 361, 400, 456, 474, 484, 513, 592, 634, 676, 784, 808, 961, 1089, 1369, 1936, 2286, 2302, 2360, 2362, 2397, 2401

Offset

1,1

Links

Table of n, a(n) for n=1..54.

Rémy Sigrist, C program

Example

The first 7 terms of A356640 are 1, 3, 50, 5, 44, 7 and 161. The record values, 1, 3, 50 and 161, occur at n = 2, 3, 4 and 8, the first 4 terms of this sequence.

Mathematica

v = A356640[50, 10^4]; s = {}; m = 0; Do[If[v[[i]] > m, m = v[[i]]; AppendTo[s, i + 1]], {i, 1, Length[v]}]; s (* uses code from A356640 *)

Prog

(C) See Links section.

Crossrefs

Cf. A356552, A356640, A356642 (the corresponding record values).

Sequence in context: A073465 A174816 A161494 * A296161 A121612 A061193

Adjacent sequences: A356638 A356639 A356640 * A356642 A356643 A356644

Keyword

nonn,base

Author

Amiram Eldar, Aug 19 2022

Extensions

More terms from Rémy Sigrist, Sep 07 2022

Status

approved