OFFSET
1,2
COMMENTS
a(14) > 10^3000, if it exists. Note that one among k, k+2, k+4 is always divisible by 3, so it must be a power of 3. - Giovanni Resta, Nov 12 2019
EXAMPLE
7 is a term since 7, 9, and 11 are all prime powers.
MATHEMATICA
pp[w_] := w == 1 || And @@ PrimePowerQ[w + {0, 2, 4}]; Reap[ Do[ If[pp[n - k], Sow[n-k]], {n, 3^Range[100]}, {k, {4, 2, 0}}]][[2, 1]] (* Giovanni Resta, Nov 12 2019 *)
PROG
(PARI) isok(k) = (k==1) || (isprimepower(k) && isprimepower(k+2) && isprimepower(k+4)); \\ Michel Marcus, Nov 12 2019
CROSSREFS
KEYWORD
nonn,more
AUTHOR
Lior Manor, Nov 12 2019
EXTENSIONS
a(12)-a(13) from Giovanni Resta, Nov 12 2019
STATUS
approved