OFFSET
1,2
COMMENTS
See A377120 for a guide to related sequences.
EXAMPLE
prime(6) = 13 -> 31 -> 67 -> 139 -> 283 -> 571 -> 1147 = 31*37, so a(6) = 6.
MATHEMATICA
Table[p = Prime[n]; c = 1; While[p = 2*p + 5; PrimeQ[p], c++]; c, {n, 200}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Clark Kimberling, Oct 31 2024
STATUS
approved