OFFSET
1,1
COMMENTS
See A377120 for a guide to related sequences.
EXAMPLE
prime(3) = 5 -> 17 -> 41 -> 89 -> 185 = 5*37, so a(3) = 4.
MATHEMATICA
Table[p = Prime[n]; c = 1; While[p = 2*p + 7; PrimeQ[p], c++]; c, {n, 200}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Clark Kimberling, Oct 31 2024
STATUS
approved