Voozh

A366929

Indices of records in A366927.

1, 2, 3, 7, 23, 47, 139, 283, 659, 1319, 8637, 20147, 83491, 169861, 999013, 3797401, 8153567, 55443959, 187814447, 646611887

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,2

COMMENTS

The primes may not be in order. a(3) = 7, but the three primes are 2, 3, and 7.

LINKS

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

MATHEMATICA

r = 0;

s = Array[-1 + CountDistinct@ Rest@ NestWhileList[{#1 - #1/#2, #2} & @@ {First[#], FactorInteger[First[#]][[1, 1]]} &, {#, #}, Last[#] > 1 &][[All, -1]] &, 2^16, 2];

{1}~Join~Reap[Do[If[# > r, r = #; Sow[i + 1]] &[s[[i]]], {i, Length[s]}] ][[-1, 1]] (* Michael De Vlieger, Nov 08 2023 *)

CROSSREFS

Cf. A366927.

Sequence in context: A037231 A376188 A248525 * A376187 A346161 A082449

Adjacent sequences: A366926 A366927 A366928 * A366930 A366931 A366932

KEYWORD

nonn,more

AUTHOR

Robert G. Wilson v, Oct 31 2023

STATUS

approved

URL: https://oeis.org/A366929

⇱ A366929 - OEIS