OFFSET
1,1
COMMENTS
Indices k of p's are 8, 9, 11, 12, 19, 23, 28, 62, 64, 68, 71, 85, 95, 104, 114, 115, 131, 134, 175, 178, 181, 182, 200, 216, 240, 246, 247, 250, 266, 276, 277, 316, 346, 372, 382.
And some of k's themselves are prime: 11, 19, 23, 71, 131, 181, 277, 421, 541, 601, 673, 751, 881, 937. See link to Fernandez.
LINKS
Neil Fernandez, An order of primeness.
EXAMPLE
43 = (p + prime(p))/2 for p = 19 (prime),
53 = (p + prime(p))/2 for p = 23 (prime).
PROG
(PARI) lista(nn) = forprime(p=3, nn, k=(prime(p)+p)/2; if(isprime(k), print1(k, ", "))) \\ Jinyuan Wang, Mar 01 2019
CROSSREFS
KEYWORD
nonn
AUTHOR
Zak Seidov, Mar 01 2019
STATUS
approved