OFFSET
1,2
COMMENTS
Also positions of 2 in A366835.
EXAMPLE
The 4th and 5th prime powers are 5 and 7, which are both prime, so 4 is in the sequence.
The 12th and 13th prime powers are 19 and 23, which are both prime, so 12 is in the sequence.
MATHEMATICA
v=Select[Range[100], PrimePowerQ];
Select[Range[Length[v]-1], PrimeQ[v[[#]]]&&PrimeQ[v[[#+1]]]&]
CROSSREFS
KEYWORD
nonn
AUTHOR
Gus Wiseman, Dec 23 2024
STATUS
approved