OFFSET
1,1
EXAMPLE
k=2: 6^2 = 36 = 17 + 19 = prime(7) + prime(8);
k=3: 6^3 = 216 = 107 + 109 = prime(28) + prime(29);
k=7: 6^7 = 279936 = 139967 + 139969 = prime(13005) + prime(13006).
MATHEMATICA
(* M6 *) Do[If[PreviousPrime[6^n/2]+NextPrime[6^n/2]==6^n, Print[n]], {n, 1000}]
PROG
(PARI) is(k) = my(t=6^k); precprime(t/2)+nextprime(1+t/2)==t; \\ Jinyuan Wang, Feb 18 2021
CROSSREFS
KEYWORD
nonn,more
AUTHOR
Zak Seidov, Sep 26 2009
EXTENSIONS
a(7) from Max Alekseyev, Dec 14 2011
a(8) from Amiram Eldar, Apr 06 2019
STATUS
approved